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PROGRAM DESCRIPTION 
Purpose 

DT 0023 is a fault finding program which tests the file beginning 
with the simplest operations and progressing to the more complex 
(e.g. , Read Sector). This arrangement allows a trouble to appear 
in the simplest instruction that will fail, thereby simplifying 
trouble analysis. 

This program will not pin point the trouble for the Customer 
Engineer, rather, it is intended to indicate the Failing Function 
very rapidly after which the C.E. must rely on his standard 
"trouble shooting" techniques. 

Program Requirements 

This test is to be used on the 1620-1/1311-3. Its use on the 162 0-n/ 
1311-3 is not recommended. 

Equipment Requirements 

Some routines make use of jumper wires to allow the 1620 to test 
large blocks of functional circuitry (e.g., bit ring) independent of 
the remaining file circuitry. Whenever jumpers are used, be sure to 
. follow instructions implicitly to prevent damage to the machine 

circuits . If a jumper should be inadvertently installed in the wrong 
location, v/rite down the erroneous pin location before removing the 
jumper - this will greatly simplify trouble shooting any resulting 
circuit damage. 

The C.E. disk pack should be used with DT 0023 but any (scratch) 
pack may be used as long as the addresses are correct and 
readable. 
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NOTE: See Pages 01.03 and for starting addresses of Routines. 
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USE PROCEDURE 



Before Running DT 0023 

1. The 1620-1 must be functioning properly, 

2. Install C.E. Disk Pack (or scratch pack). Disk Pack must have 
good addresses. 

3. Tiirn on 1311 start/stop switch. 

4. Verify proper initial seek sequence before proceeding. 

a. Carriage seeks to track zero after loading heads. 

b. Ready (green) light turns on. 

5. If "a" or "b" above do not function properly, correct before 
proceeding. 

Control Switch Settings 

1. Normal program run, turn all switches down ("off" and "Program"). 
Mternate sense switch settings: 

a. SS 1 ON By-pass error t vpeout during diagnostic loops 

b. SS 2 ON Redevelop error 

c. SS 3 ON Loop in core load and suppress normal typeout 

d. SS 4 ON Loop in routine 

Progra m Loa ding 

li Clear 1620 storage 31 00003 00002 
2 . Put program deck in card reader and press LOAD key or 
load paper tape (insert, 36 00000 00300 RS) 

Operating Instructions 

1. Respond to Instructions from typewriter. (Type Module number, RS.) 

2. Read and execute instructions in Reference A (Machine hang up conditions). 

3. Follow typeout of program sequence. If an error is detected, look up 
error number or reference number in this manual. 

4 , If the 1620 fails to start after correct execution of Instructions in 
^ Reference A, check the following: 
[ a. Sector cycle on Solid-Logic, 05,07.10.1 
, b. File Control cycle on solid - Logic 05,07,20.1 
c, Cyclinder overflow on solid - Logic 05.30.10.1 
d* Address cyclinder check on solid - Logic 05.30.10.1 
5. To RESTART PROGRAM, branch to 00500 (either core load I or 2). 
6* After correcting trouble, ALWAYS RERUN COMPLETE PROGRAM 
(from step I, program loading) 
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Printouts 

1. Normal typeout 

The typewriter prints out the address end name of each test routine 
as it sequences through the program. 

Example 04506 - bRCH NO GM 

04860 - RD I-CYC ENTRY 
etc. 

2. REFERENCE Printouts. 

The typewriter will print out reference statements such as "REF A", 
"REF B", etc. These references provide additional information required 
to implement certain test routines. The references are arranged in 
alphabetic order starting on page 02.01. 

3. ERROR Printouts 

The typewriter types error numbers such as "ERR 001", "ERR 102'*, 
' etc. when the program detects a failing function. Descriptions of 
error numbers are arranged in order starting on Page 03.01. 

After each ERROR typeout, the machine will halt. Pressing the 1620 
"START" key puts the program in a diagnostic loop. Further ERROR 
typeouts and Halts may be suppressed by turning SW #1 on. 

4. DIAGNOSTIC LOOP 

This Is a short programmed loop designed to exercise the failing 
function. It can be used as a scoping loop or to check repair. 



Duplicate DT 0023 

1. Cards: 

a. Place program deck in card reader and blank cards in punch hopper 
. b. Clear 1620 storage 
c. Insert 37 00501 00500 

39 00501 00400 

49 00000 RS 

2. Paper Tape 

a. Load program tape onto reader 

b. Insert 36 00000 00300 RS 

c. After piPogFam is loaded, branch to 00588. 
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DIAGNOSTIC TEST 0023 

TURN ALL SWITCHES OFF OR TO PROGRAM 

KEY IN MODULE NO. PACK IS ON 0R5 

O36I6 - REF A 
0^4l86"T620 FILE IND RESET 
0/+506-eRCH NO GM 
OkSeo-RD I -CYC ENTRY 
0630i^~FLIP MUC TGRS 
O7238--NORM FILE IND RESET 
07666-RD HEAD MAP 

PART 2 OF DT 0023 

ARE HEADS AT CVL 03,TYPE Y-N m 

03796 - REF J 

03S8W/R l~CYC ENTRY 

OkkSG-tlMiK XFER 

05502--V>'R/R0 DATA XFER 

037if0-V/R HEAD MAP 

09100-COMPARE LATCH 

0961 2-RESTORE ADDRESSES 

U9960-FvD SECTOR 

i123^+ - SEEK 

T207'4~GM CONTROL 

T2762-FORCE ERR LATCHES 

T3/f/46-MAR 8 BIT lOK 

T3666 - REF M 
TEST COMPLETED 



NOTE: Five Digit number preceeding routine title is the 
starting address of that routine . 
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INDEX OF REFERENCE TYPEOUTS 



REF. CHAR. 



A 02.02 

B 02.02 

C 02.02 

D 02.03 - 02.05 

E 02.05 

G 02.06 - 02.07 

H 02.07 

J 02.07 

K 02.07 

M 02.08 

N 02.08 - 02.10 

P 02.11 - 02.15 

R 02.16 - 02.17 

S 02.18 

T 02.18 

U 02.18 

V 02.18 

Y. 02.19 

Z 02.19 



DT 0023 
PN 2172366 
EC 412531 



02.02 



REFERENCE A 

What To Do When The Machine "Hancis Up" 

IMPORTANT: I. Machine is now in a hang up condition. 

These hang up conditions may occur during 
normal operation of the program. It is 
essential that the following steps be taken* 

2. To get out of hang up conditions: 

Push Reset and Release keys slmultanously, then 
push the start key. The test will proceed. 

REFERENCE 8 

Attach a jumper from Al D40K to J pin. This will prevent the 
1620 clock from stopping on an Illegal operation. 
Press 1620 start key to continue. 

REFERENCE C 

A select lock occurred which cannot be isolated in core load 2 * 
Read In core load land branch to the Select Lock test (00536). 

Note: If Select Lock is on when 01 23 starts execution, 
]^RR too will type out . 
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REFERENCE D 

Read Scan - This routine reads a track into core and prints out 
the First Record. (Set typewriter margin to type 70 characters 
per line). The File Op. used is a RTN with head 0. 

1. Install jumper from Al F33R to J pin. 

This brings up "Gate A of the I/A record" which causes all 
data (AGC, address and record) to be transferred to the 
CPU on a Read Op. 

2. Turn switch #1 ON to cause the Read Op. to loop. 

3. Press 1620 start key to begin. 

4. To type out a data scan, turn switch #1 off momentarily, 
returning it to the ON position as soon as the typewriter 
starts. 

5. Compare the typeout to the scan typeout model on page 02.05. 
Mark the location of the first character on the typeout that 
fails to compare to the model. This will help to identify the 
matching error typeout. 

6. Return to Ref "P" or "N" and proceed. 
Scope Simulator 

The typewriter may be used in lieu of the scope when using the 
scan routine. This is done by substituting the signal to be 
displayed for the standard read data line, thereby converting 
logic levels into read data, and transferring this information to 
core. 

Remove the slip-on terminal at edge connector Al D02 F and 
install one end of a long jumper to this pin. Use the other 
end of this jumper to probe any logic line desired. 

The scan jumper, Al F33R to J pin must be On. 

Press 1620 start key. (1311 start/stop switch should be on). 

Turn switch #1 off to type out. 

Note the time base of the display on the prior read data 
typeout. This is Important since some machine failures will 
change the time base (number of machine cycles) between 
sector start pulses. 

(Continued) 
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Scope Simulator (Continued) 

6. Interpret the voltage levels as follows: 

*"@-=s Voltage + for entire Bit Ring cycle 
■J = Voltage - for entire Bit Ring cycle 

anything else = Voltage - for some part of Bit Ring cycle 
Example: 7 = Voltage - for 4, 2 & I of Bit Ring cycle 



(Continued) 
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REFERENCE D (Continued) 
Scan Typeout Model 



Sector Start 
(Index) 

Addr. AGO 




Gap 



Gap 



I/A 

/ ^/ * s^/ $ 

12 Pos 6 Pos 8 Po6 
ja^«iQ( 5)^^ 2233M556677889900 
112233i*4556677889900112233445566778899001 12233445566778899^^^'^®^^^^^^ 



Record 
AGC 

JL 

8 Pos 



Record 

100 Characters 
X 



I 



I 



I 



I 



I 



J 

Record 



I 



I 



T 



Addr. AGC 
2nd Sector Start 



NOTES: 

r. The above typeout is a typical example of the information sent 
to core on a Read Op. with "Gate A of the I/A record" conditioned 
by means of a jumper. 

2. The Read Gate is off during most of the AGC. This blocks read 
data and results in no bits set into FBR. The read translator 
decodes "no'* bits as 8/M*s. Even parity 8/M»8 typeout as*©* 
(center scored "at signs "). 

3.. The gaps ordinarily type out as M*s; however, this is not 
extremely significant. They may type out correctly as any 
combination of M, 2 or 1. 

M.. The I/A and record typeouts both show the actual data written 
on disk. The I/A in the model shows that cylinder 03 was read. 

5. The addr. AGC of the second sector is displ«iyed so that any 

failure occurring near the end of first sector might be recognized, 
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REFERENCE E 

Read Head Map 

This routine reads full track with addresses from each RA^ head 
at cylinder 03. On each read operation, the first five characters 
of the read data in core are analyzed and the R/W head number is 
decoded. This information is then stored in a matrix (Head Map) 
along with a record of any errors occurring on the data transfer. 
If ho error is detected, a digit representing the R/W head number 
is stored in the map. 

Meaning of the Symbols 

- (Flag) Invalid address 

@ = no data transferred 
J = read checks or parities 
digit 0 through 9 = Head address actually read 
Examples 

0123M56789 - Normal map 

m23M56789 - No data XFerred when head O tried; all others OK. 
0123M5t789 - Parities when head 6 tried; all others OK. 

REFERENCE G 

To Run The Bit Ring Test 

1. IHim off 1311 start/stop switch. 

2. Attach the following jumpers: 

a. Al F09F to Bl D2HR (Read Parity to or S^) . 

logic pages 05.05.22.1 and 05. IM. 30.1 

b. Al A15E to Bl E36Q (MQM to Bit ring advance) 

logic pages 05.06.10.1 and 05.20.20.1 

e. Al A15D to Bl E43F (MQl to A resets) 

logic pages 05.06.10.1 and 05.32.10.1 

3. Press 1620 start key. 

(Continued) 



DT 0023 
PN 2172366 
EC M12531 



02.0? 



REFERENCE G (Cofttlniiedl 

This routine resets the Bit ring to $2, ' proceeds to advance the bit 
ring until Si or S2 is sensed. The pwqmm counts the number of advance 
pulses sent between Sj and S2 bits sensed, to determine where the 
failure occurred. 

Note: Correct operation is indicated if Ref . "Z" types after several 
seconds. 

REFERENCE H 

To Run The Read Oscillator Test 

I. Turn off the 1311 start/stop switch. 

2 . Attach a jumper from Al F09F to Bl B44C. This connects Read 
Parity to counter 000 - logic pages 05.05,22.1 and 05,15.60,1. 

3. Turn on the C.E. clock gate switch. 

4, Press 1620 start key. 
Adjusting The Oscillator 

With the program looping, the osc, repetition rate will type out 
periodically. Turn the adjusting screw on the SMS card at Bl D20 
in very small increments until at least two typeouts indicate that 
the oscillator is in spec. 

Turning the screw clockwise decreases the time interval between 
oscillator pulses. 

For B Suffix I31ls (with two oscillators), after adjusting one 
oscillator card, exchange the SMS cards at Bl D20 and 19 and 
repeat the adjustment on the oscillator nov,^ located at D20. Both 
oscillators will then be in adjustment. Turn Switch 2 on to Exit. 

REFERENCE T 

1. Turn on the Write Address and Compare Disable switches. 

2. Press the 1620 start key. 
REFERENCE K 

You have told the processor that the carriage is not positioned 
at cylinder 03. 

1. Manually operate the detent and move the arm to cylinder 03. 

2. Press the 1620 start key, 

US 0023 
PN 2172366 
EC 412531 



02.08 

REFERENCE M 

•Return the 13U to customer operatir^g ooodltte-. 
Make sure: 

1; Ail manual jumpers have been removed. 

Z» All operating switches are in their normal operating position. 
3., Remove the C.E. disk pack. 
4. Install machine covers, etc. 
REFERENCE N 

The file failed to Read (no data transferred) from any head, 
(^ee REF E for detailed explanation of H^ad Map.) 

1/ Press 1620 start key. 

t. Do Ref. G. 

3. If no Error typeout, press 1620 start key. 

4 . Do Ref, H. 

5. If no Error typeouts , press 1620 start key. 

, 6. Do Ref. D, 

t. Compare the scan typeout to the error typeouts shown on 
page 02.09 

Note the number of the typeout which matches or most 
nearly resembles the typeout given by your machine. 

8^ Refer to Functional Failures listed by error number 
on page 02.10 
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REFERENCE M (Coatlniied) 
Scan Error Type oute 



^' OOOOOO0OOO0OOOOOOOO'X)OOOOOOOOCOOOOOOOO0OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 

I I i t I i I 



i I i I i I i 



ooooooooooooooooooooooooooooooooooooooooooooooooooooocoooooooooooooooo 

^* 0000000000000000000000000000000000000000000000000000000000000000000000 

I I I I I I 1 



(Continued) 
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REFERENCE N (Continued) 

, Fiinctlonal Failures (possible causes of Read Sean, errors) . 

1. No data is read from the disk - there is no read amp output. 
' Only the 1st AGC appears in the typeoiit^ This is possible 

because the following are present: AGC gate, clock gate, osc 
pulses, bit ring pulses, MUC counts, 0/E tgr. flips and CPU 
sync pulses are generated. The lack of any bits in FBR trans- 
late as 8/M*s and typeout as P*s. Check the following 
possible causes: 

a. No head selected - 05.2SJI0.1 

b. No signal gate - 05.22.30.1 

c. No read gate - C2. 33. 20.1 

d. Open coax or dead read amp. - C2. 33. 15.1 

e. No gap gate - 05.22.50.1 

2. Check for end I/A gate up solid - 05.22.60.1 

3. Check for AGC gate up solid - 05.22.10.1 

No AGC information or data has been transferred. Cheek for the 
following failures: 



a . 


No CPU sync 




05.09.20.1 


b. 


No read enable 




05.09.10.1 


c. 


0/E tgr. off solid 




05.08.30.1 


d. 


No phase A, B or C pulses 




05. IM. 10.1 


e. 


No clock gate 




05.22.30.1 


f . 


No sector start 




05.21.10,1 


g- 


End of record gate on solid 




05.22.60.1 


h. 


Group mark or WLR on solid 




05.30.10.1 


i. 


Functional reset up or down 


solid 


- 05.32.20.1 


j. 


NRF tgr. on solid 




05.21.30.1 


k* 


Gap gate on solid 




05.22.50.1 


1. 


Compare latch on solid 




05.21.30.1 
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REFERENCE P 

Parity errors occurred on two or mom hssds 

(See REF E for detailed explanation of Head Map.) 

1. Press 1620 Start key. 

2 . Do Steps 1 through 6 of Ref D. 

3. Compare the scan typeout to the error typeouts shown on Pages 02,12 and 
02.13: note the number of the typeout which matches or 

. most nearly resembles the typeout given by your machine. 

4. Refer to Functional Failures listed by error number on 
Pages 02.14 and 02. IS. 

NOTE: The scope simulator may be used in lieu of the 
scope to check the items listed under Functional 
Failures. 



(Continued) 
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REFERENCE P (Continued) 
Sean Erroy Typepyte 



Error No. 



, 1 50005^11 501 2105^1 800111 5026500051 1 100000101 500051 1 1000001 1 1 5000510100 
^' 00511f500001010000S111^^^O000101^f00051 110000010150005101010^1500051 115 



I 



I 



i 



I 



I 



I 



\ 



2. 



+1*2^35ii5556f7^590Of1*2^3W5§6?7S8§90O4^ 

I I I I I 1 " I 



pffffrfffCfffOOOOOOOOOOOOOOQOOOOOOOOOQOOOOOOOOOOOOOOOOOOOgOOOOOGOOOQO 
00000000000000000000000000000000000000000000000 OOOOOOOOOOOOOCOOOOOOOOO 

I I I I I I I 




O9«W090000e000000 
I I 



^- 001122334^*55667788990011 2233^'»556677889900ee^i^'i5«^4000601if^^^ 



I 



I 



I 



I I I I I I I 



7 • ^16^2?i>3.»ii6i&5$»6$ft75»8$&9$^16*2^3S^ 



I 



I 



I 



I 



I 



I 



I 



8. 



^lM^3^55i^78899*0^m28:^i|^5)it63i^78899^(ail2t^i«5Ht6)lt78 

. ■ ' ■■ . »■ ■ : .1 ■■■ .-im.- t ■ I.. .. . I ■ : \ . ::■ i 



(Continued) 
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REFERENCE P (C&ntiwa^m 



Scan Error Tvpeouts 



Error No. 



9. 




I 



I 



I I I I i 



11. 




! 



5W5OTS5555555S^ 



[5555^^5OT?WW5555 
>if 000601 
i I 




12, 



KMS5555555S6S55Wi;W5^5555S55^ 
I I i 



I 



I 



13. 



^999*2 mfeoeei 1778899003 

>S8^903359^€5iei{^*i^237fe^W»5^^ 

I } i i 



Itt. 



1 1 2233^^54^^:?^8^^g <a( S (a o a^^ 

I I I I I I I 



15. 



(ati^gi^ ^ 1 2233^^556677889900 

1 12233Mf55667788990O112233^*'*55667788990OU2233M*5566778^9e9^^*^^^^^^^ 
I t i t } I I 



ifi ( g gi ta a^ ^ 2233^^556677889900 
11 22^3^^i^5566778899001 1 2233«*'t556677889900 1 1 2233^^5566778899O^e 0(S>0(S(jW(?^ 
I I I I I I I 



17 



^^3^s^s^sm^^^^200QSQ(^^^^hdo(>QOZ33kk5S^^77BBS900\ 1 2233445566Z7889900 
t12233«*i»5566778a99001 122334^5566778899001 1 2233 W566778899:»^1^^^ 

■ ^ ' ^ontinuet^ * * ; * 

DT 0023 

PN 2172366 
EC U12531 



REFERENCE P fContisiued) 

Functional Failures (possible caiises of Ui.oni w rrors) 

Check items listed under Error No. corresponding to Error 
typeout number shown on previous pages. 

NOTE: Either Scope or Scope Simulator may be used (See Ref, D). 
ERROR NO. POSSIBLE CAUSE REFER TO LOGIC PAGE 

1. Check for following error conditions occurring during the 
record portion of the sector. 

a. Solid addr. compare gate - 05.15.70.1 

b. Write strobe on (Bit ring C) - 05.12.60.1 

c. Counter 003 or 004 gate MAR - 05.15.60.1 

d. No standard read data - 05.12.10.1 

2. Even FBR B bit on solid -05.12.10.1 

A similar typeout would be given for any bit of either FBR 
(0/E) . Note that extra bit is present even during the AGC's 
when no read data is gated. 

3. No AGC gate -0^-22.10.1 

M. 0/E trigger failing to flip - 05.08.30.1 

a. No 0/E tgr. advance 
, b. 0/E tgr. on solid 

5^ Address AGC is too short. 

Set counter 8-10 pulse missing - 05.15.30.1 

6* a. No standard read data - 05.12.90.1 

b. Count 000 latch failing to set - 05. 15. MO. 1 

NOTE: If the count 000 latch fails to set, the high order triggers 
in MUC will turn on erroneously with the set counter to 13 
pulse. Since MUC must count down to zero to turn off AGC 
and turn on the read gate, no data will be read. 

7; No Even Standard read data - 05.12.90.1 

8. Even Read translator 8 bit up solid - 05.11.20.1 

Any bit of either translator (0/E) would give similar typeout. 
NOTE: When 8 or ^ bit is up solid, typeout appears to be normal 

during AGC. This happens because the failure is masked 

by the B/H bit combination. 

(Continued) 
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(Continued) 

9. AGC disable on solid - OS. 22. 20, i 

NOTE: Read data is scrambled during address and record. 

10. One "read bit latch" failing to latch - 02.33.20.1 
(This trouble applies only to ISU's with two oscillators.) 
Note that failure pattern may be consistent for several 
characters. 

11. Missing address gate - 05.22,10.1 
Presence of all bits during record AGC shows that the read 
gate failed to go off after the I/A. Record gate is coming 
up early (at beginning of address instead of beginning of 
record). This also causes end of record to come up early as 
seen by the location of the AGC for the second sector. 

12. a. Noendl/Agate - 05.22.60.1 

b. No I/A gate •- 05.15.70.1 

c. Counter 000 latch failing to latch - 05.15.40.1 

Presence of all bits during record AGC shows that the read 
gate failed to go off after the l/A. 

13. Oscillator out of adjustment ~ 

Branch to oscillator test routine. (49 00516) 

AGC information is correct but record and possibly address 

data are scrambled. Format is OK. 

14. Read bit trigger failing to set - C2. 33. 20.1 
(This trouble applies only to the 13U with two oscillators.) 

15. Functional reset latch failing to latch - 05.32,20,1 

16 ; Trigger 30 set failing to latch - 05.08.10.1 

17, a. No record gate - 05.15.70.1 

b. No end of record gate - 05.22.60.1 

Read data In first sector is correct. Failure occurs during AGC 
of second sector since record is not terminated properly. 

REFERENCE R 

To Run Select Lock Test 

I, Attach a Jumper from Al C17L to Bl D14C. Leave this Jumper 
^ on till the end of the test (Ref. M). This connects MAR 8 bit 

10 THOU to select lock reset. - logic pages 05.06.30.1 and 

C2, 33. 05.1. 

(Continued) 
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Continued (Ref. R) 

2,. Install "scmtch" packs on aii modoleg. Imi&g tested** 

3. Turn on 1311 start/stop switch on all modules being tested, 

4. Press 1620 start key. 
Interpreting the Module Select Lock Map 

this routine checks for a multiple module select condition. The 
"one" indicates that a Select lock occurred, the "zero" Indicates 
correct operation. The map will consist of from two to four 
characters depending on the number of modules being tested, 

(EXAMPLE) 

MAP PROBLEM 

0123 (Module No.) This example indicates 
1101 that Module 2 is always 

being selected (erroneously). 

Interpreting The Head Select Lock Map 

This routine checks for a multiple head select condition or a 
missing head select. The "one" indicates that select lock occurred, 
the "zero" Indicates correct operation. See examples on following 
page. 
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REFERENCE R (Cositlyttjed) 

. ■ • EXAMPLES 

MAP PROBLEM: Some Head Select Is On Solid. 



0 


1 


2 


3 


M 


s 


6 


7 


8 


0 


(HEAD POSITION) 






0 


1 


1 


1 


1 


1 


1 


1 


1 


1 


YO 






1 


0 


1 


1 


1 


1 


1 


1 


1 


1 


Yl 






1 


1 


0 


1 


1 


1 


1 


1 


1 


1 


Y2 






1 


1 


1 


0 


1 


1 


1 


1 


1 


1 


Y3 






1 


1 


,1 


1 


0 


1 


1 


1 


1 


1 


YM 






1 


1 


1 


1 


1 


0 


1 


1 


1 


1 


Y5 






1 


1 


i 


1 


1 


1 


0 


1 


1 


1 


Y6 






1 


1 


1 


1 


1 


1 


1 


0 


1 


1 


Y7 






1 


1 


1 


1 


1 


1 


1 


1 


0 


J. 


Y8 






1 


1 


1 


1 


1 


1 


1 


1 


1 


0 


Y9 








PROBLEM: 


HAR 


Decode failure; No Input To: 






1 


0 


0 


0 


0 


0 


0 


0 


0 


0 


B1C36L, 


B1D35C or 


B1C37P 


0 


1 


0 


0 


0 


0 


0 


0 


0 


0 


B1D37H, 


B1C37F or 


Bi D37A 


0 


0 


1 


0 


0 


0 


0 


0 


0 


0 


B1D37F, 


B1D35F 




0 


0 


0 


1 


0 


0 


0 


0 


Q 


0 


B1C36D, 


B1C36H or 


B1D36A 


0 


0 


0 


0 


1 


0 


0 


0 


0 


0 


B1D37C, 


B1D35F 




0 


0 


0 


0 


0 


1 


0 


0 


0 
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B1D37B, 


B1D35L or 


B1C37D 


0 


0 


0 


0 


0 


0 


1 


0 


0 


0 


B1C36Q, 


BIG 37 Q or 


B1D36C 


0 


0 


0 


0 


0 


0 


0 


1 


0 


0 


B1C36C, 


B1D36B 




d 


0 


0 


0 


0 


0 


0 


0 




0 


Bl D37Q, 


, B1C37C or B1D36L 


0 


0 


d 


0 


0 


0 


0 


0 


0 


1 


B1D35B, 


B1C37H 





See logic 05.25.40.1 
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1. Pull the write-erase safety card at Bl Bi3 . 
2 • Press the 1620 start key. 
REl'ERENCET 

1. Pull the Read-Write "And" card at Bl C09. 

2, Press 1620 start key. 
INFERENCE U 

1^ Replace the R/W "And" card pulled at Ref. T (B1C09). 

2. Pull the AC-DC safety card at Bl C06. 

3. Stop and start the 1311 to restore the carriage. 

4. Press 1620 start key. 
itEFERENCE V 

To Check Spindle Speed 

1. Attach the following jumpers; 

a. Al F09F to Bl B27D (read parity to gated index) 

logic pages 05.05.22.1 and 05.21.10.1 

b. Bl B26A to J pin (gated index every revolution) 

logic page 05,21.10,1 

c. Bl E32Q to J pin (conditions resets) 

logic page 05.32.10,1 

2 , Press 1620 start key - program will count index pulses for 
or)e minute, then typeout the R. P.M. 
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REFERENCE Y 

■ To Check H ea d Aiig nmgnit 
.1, Install C.£. disk pack* 

2, Attach a jumper from Bl A31G to J pin. This blocks the End of 
Record Gate and prevents an early disconnect from the read 
operation . 

' This step allows for a more stable scope display. 

3, Scope the output of the high level amplifier - sync on gated index. 

4. Press the 1620 start key - the machine will start reading head 0 
on Track 35 . 

5, Display approximately two sectors (500 us/div). 

6. Loosen the clamps and adjust the arm adjusting screw for the 
selected head until the read envelope shows definite nulls 
(points of zero amplitude). See the C.E. Reference manual for 
details. 

7. Turn switch #2 on, then immediately back off to select the next 
lower head in physical sequence: i.e., 0, 3, 4, 7, 8, 1, 2, 
5, 6 & 9. 

REFERENCE Z 

1. Remove all jumpers . 

2. Restore all switches to their normal (Read Sector) positions: 
i.e.. Write address and compare disable off, C.E. panel switches 
off, Start/Stop Switch On. 

3. Press the 1620 start key. 
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INDEX OF ERROR TYPEOUTS 



ERROR NUMBERS ROUTINE PAGE NUMBERS 

010 - 015 BIT RING 03.02 

020 -021 OSCILLATOR 03.03 

030 SCAN 03.04 

100 CONTROL 03.05 

110 -115 1620 FILE INDICATOR 03.06 

RESET 

120 - 12 3 BRANCH NO GROUP MARK 03.07 

130 - 138 READ I-CYCLE ENTRY 03.08 - 03.09 

140 - 147 FLIP MUC TRIGGERS 03.10 - 03.11 

150 155 NORMAL FILE INDICATOR 03,12 

RESET 

160 - 168 READ HEAD MAP 03.13 - 03.15 

170 - 173 SELECT LOCK 03.16 

180 - 182 SPINDLE - SPEED 03.17 

200- 204 WRITE I-CYCLE ENTRY 03.18 

210-214 BLANK TRANSFER 03.19 

220 ^ WRITE/READ DATA TRANSFER 03.20 - 03.21 

230 ' WRITE HEAD MAP 03.22 

240- 242 COMPARE L/itTCH - RESTORE 03.23 

ADDRESSES 

251 - 256 READSECTOR 03.24 

260 -261 SEEK 03.25 

270 -274 GROUP MARK CONTROL 03.26 

280 -287 FORCE ERROR LATCHES 03.27 

290 / MAR 8 BIT 10 THOU 03*28 
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ERROR 010 

Bit ring S2 failed to turn on. It sho?iId be turned on by Reset A5 . 
Turn on Switch 1 and push Start Key for two instruction loop 
which will continue to try to Reset Bit Ring S2 on for scoping. 
See logic OS. 20. 40. 1 

ERROR Oil 

Bit ring S^, A, 83 or 1 failed to turn off. 

Check for faulty trigger card or missing Adv. 2 pulse. 

See Note. 

See logic 05.20.40.1 
ERROR 012 

Bit ring failed to advance correctly. See note. 

Compare the number of advance pulses sent (See typeout) to the 

statements below: 

Sent 02 ADV Bit ring B or 2 failed to turn off. 

Sent 03 ADV Bit ring C or 4 failed to turn off. 

Sent 04 ADV Bit ring W or 8 failed to turn off. 

See logic 05.20.40.1 

ERROR 013 

Bit ring Sj, 8, 4, 2 or I failed to turn on. See note. 

Check for faulty trigger card or missing Adv. I or Adv. 3 pulse. 

See logic 05.20.40.1 

ERROR 014 

S^ or S2 failed to turn on after six advance pulses were sent. See note. 
Check the output of the bit ring triggers to determine the last trigger 
set. Faulty circuit should be the last trigger set or the following 
stage. 

See logic 05.20.30.1 

ERROR 015 

Bit ring W, C, B or A failc^d to turn on. See note* 
Check for faulty trigger card. 
See logic 05.20.30.1 



NOTE: Push Start Key. The Program will go into a loop which resets 
(Scope LoopJand sends advance pulses to the Bit Ring. 
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ERROR 02 0 

Counter Zero is failing to tern on s 
' See Note below. See Logic OS .15 « 60^1. 

(A misplaced jumper may also cause this error - check 
Jumper location) 

ERROR 021 

Counter zero is on solid. See note below. 
See Logics 05.14.10.1 and 02. 33.20.1. 



NOTE: To Scope, turn on the clock gate switch on the 1311 

(Scope Loop) CE panel. This causes the oscillator, bit ring, and 

MUC to run. They may now be scoped. The CPU 

need not be running at this time. 

After correcting trouble turn CE clock gate switch off 
(to reset Bit ring), then back on. Push start key. 
Turn Switch 2 on to exit from routine. 



CE. CLOCK GATE 
SWITCH ON AT CE 
PANEL 





osc. 




BIT 




MUC 






RING 





COUNTER 000 TO 
READ CHECK 



OSCILLATOR TEST 
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ERROR 030 

Hang up condition occurred during tovi Trssok operation in the 
Scan routine. 

.(Check for proper location of the jumper installed at REF D.) 

As long as error is present (Failure to get file exit) the machine 
will stay in a loop. The error typeout can be suppressed by 
turning on Switch I, however, because of the type of error, the 
CE must press Reset and Release Simultaneously each time he 
wishes to execute the loop. See ILD 04.02 
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ERROR 100* 

■ An illegal operation failed to stop the 1620 clock;.- The instruction, 
36 PPPPP 00708 (MQ = 8), should stop the clock causing a program 
hang up condition. 

See logic 05.06.10.1 

Turn on Switch I and press Start Key. The Program is now in a 
two instruction diagnostic loop. Scope the failing circuit. 



* NOTEi If Select Lock Light is on at this time* insert and 
branch to select Lock Test. 
(49 00556) 
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ERROR ilO 

Address check indicator (36) failed t& mmtr. See Mote below. 
See logic 01.25.17.1 

ERROR 111 

Wrong length Record/Read back check indicator (37) failed to reset, 
'See Note Below, 

See logic 01.25.17.1 

ERROR 112 

jbyllnder overflow indicator (38) failed to reset. See Note Below. 
See logic 01.25.17.1 

ERROR 113 

Any Disk Check indicator (39) failed to reset. See Note below. 
See Logic 01.05.17.1 

ERROR 114 

Read check indicator (06) failed to reset. See Note Below. 
See logic 01.81.45.1 and 04.30.30.1 

ERROR 115 

Write check indicator (07) failed to reset. See Note below. 
See logics 01.81.45.1 and 05.30.30.1 



NOTE: One or more Error Typeouts have occurred. Turn Switch 1 on. 
Push Start Key. The Program will go into a Diagnostic Loop 
attempting to reset all of the above indicators. Scope the 
failing circuit. After correcting trouble turn Switch 2 on to 
exit from loop. Push start key to continue. 
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ERROR 420 



CPU- erroneously- branched on a gmup Mark l/oia Bf^lcwa 

See logic Ol«63*50.1 

ERROR121 

CPU failed to branch on a zero. See Note Below, 
See logic 01 •63.50. 1 

ERROR 122 

CPU failed to branch on a seven. See Note Below* 
See logic 01.63.50.1 

ERROR 123 

CPU failed to branch on a Record Mark. See Note Below. 
See logic 01.63.50.1 



I^OTE: One or more error typeouts have occured. Turn Switch I 
on. Push Start Key. The Program will go into a 
Diagnostic Loop to INTERROGATE the above Indicators. 
Scope the failing circuit . 
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ERROR 130 

-Hang up c€m.diWm o^-^r r-^' m:^::'--: "-:f operation 

■being exe^cyited is an lihjg'&i Op., w:jjr:h ■■■ ^■^^-'-^^iM ^x?vob kufi y:i<;ik 
■(to I-cycles) • The program wJlJ, rmmii: H a. :i.oop to allow Single 
Cycling through File Load Cycles. See Note on following page. 

Check for -S File Exit 

See logic 05.07. 30,1 and ILD pages 04.01 & 04,02. 

ERROR 131 

1620 clock Is being stopped erroneously. Check for -S Clock 
Stop (should be plus). See Note on following page. 
See logic 05.06.10.1 

ERROR 132 

Hang up condition occurred during File Control Cycle of a Read 
operation with a sector count of 000. Switch thousand and Sector 
test gate should turn on File Exit latch. Program will remain 
in a diagnostic loop. See Note on following page. 

Check for +¥ FC File Exit 

See logic 05.07.20.1 and ILD page 04.02 

ERROR 133 

Machine failed to exit from a Seek (to cycle 03) operation. 
Program will remain in a diagnostic loop . See Note on following 
page. 

Check for missing -Y Promised Exit 
See logic 05.07.30.1 

ERROR 134 

The carriage went to positive stop on a Seek to cylinder 00. 
See Note on following page. 

pheck for following failures: / 

1. -Y counter 000 off solid -05.15,60.1 

2. One or more MUC triggers on solid -05.15.40.1 

After correcting trouble push 1311 start/stop to restore carriage. 

ERROR 135 

Busy latch failing to reset. Reset normally occurs when +S 15 MS 
goes plus after the detent seats . See Note on following page. 

Check for down level on +Y File Not Ready 

See logic 05.06.10.1 
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. Carriage will not seek, past cyclinder 00^ ProfifiBi attempted ■ 
a seek to cylinder 03. See Note. Check for counter 000 
on solid. 

See logic 05.15.60.1 

ERROR 137 

Machine failed to turn on Exit latch on an Address Check. See Note. 

See logic 05.07.30.1 
Check following possible causes: 

1. No gated sector, 

2 . No gated index. 

3. NRF tgr. falls to set. 

4. NoAddr. Cyl. check. 

5. File reset up solid. 

6. No selected pre-sector or sector. 

ERROR 138 

Machine failed to turn on Exit latch on a Read track operation. See Note. 
Check for missing ~S End track 
See logic 05.30*10,1 



NOTE: Turn on Switch I. Push Start Key. (If Ref Z types, remove 

(Scope Loop) jumpers that were installed and push start key again.) 

You have entered a two instruction routine which follows 
each of the above errors . It is built into the program to 
allow the repeating of the failing instruction. Because all 
of the errors on this and the preceeding page are Hang Up 
Type Errors, it will be necessary to push the Reset and 
Release keys simultanously, then the start or single cycle 
key to repeat this routine . After correcting trouble turn 
switch 2 on to exit from routine. Push start key to continue. 
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ERROR HQ 



The carriage went to posit.^/e stop on @ k^mk *;o cylinder Oi* 
See Note on following page. 
Check for the following failures; 

1. MUC 1-2 trigger failed to turn off (AC reset) . -05 . 15 . 40 . 1 

2. The set gate failed to come up. 

3. No count track pulses. 

4. Busy latch failed to set. -C2. 2 3. 02.1 



ERROR 141 



The carriage went to positive stop on a Seek to cylinder 02 . See 
Note on following page. Check for MUC 2-4 trigger failure to 
turn off when MUC 1-2 turned on (AC inputs) . 
See logic 05.15.40.1 



ERROR 142 



The carriage went to positive stop on a Seek to cylinder 04. See 

Note on following page. 

Check for the following failures: 

1. MUC 4-8 trigger failed to turn off when MUC 2-4 turned on 
(AC inputs). 

2. Set gate up solid. 

3. Count 000 latch failed to reset. 

See logic 0j.15.40.1 



ERROR 143 



The carriage went to positive stop on a Seek to cylinder 05 . See 
Note on following page. Check for MUC 8-10 trigger failure to 
tiirn off when MUC 4-8 turned on (AC inputs) , 
See logic 05.15.40.1 



ERROR 144 



The carriage went to positive stop on a Seek to cylinder 10. See 
Note on following page. Check for MUC 16-20 trigger failure to 
turn off when MUC 8-10 turned on (AC inputs) . 
See logic 05.15.40.1 
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ERROR 145 



The carriage went to positive . 
: . See Note. Check for MUG 32-40 trigger failure t® turn off 
when MUC 16-20 turned on {AC inputs) . 
See logic 05.l5.40a 

ERROR 146 

The carriage went to positive stop on a Seek to cylinder 40* 
See Mote. Check for MUC 64-80 trigger failure to turn off 
when MUC 32-40 turned on (AC inputs) . 
See logic 05.15.40„1 

ERROR 147 

The carriage went to positive stop on a Seek to cylinder 50. 
See Note. Check for MUC 128-100 failure to turn off when 
MUC 64-80 turned on (AC inputs) . 
See page 05.15.40.1 



NOTE: A Two instruction Routine following each of the errors 

(Scope loop) on this and the preceeding page is built into the 
program to allow repeating the failing instruction. 
Push the start key to enter this Routine, Because all 
of the above errors are hang up type errors, it will 
be necessary to push the reset and release keys 
simultanously, then the stan or single cycle key to 
repeat this routine. Turn on Switch 2 to Redevelop 
error. After correcting trouble push 1311 start/stop to 
restore the carriage. Push start key to continue. 
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ERROR 150 

Address check reset failed (Head ' ^ ' 'rsote* 

Check for track gate iatch failing as* imn or missing 
track start pulse. 

See logic 05.30.20,1 

ERROR 151 

Overflow check reset failed (track Op.). See Note. 
See logic 05.30.20.1 

ERROR 152 

WLR/RBC reset failed (track Op.). See note. 
See logic 05.30.20.1 

ERROR 153 

Address check reset failed (Sector Op). See Note. 
See logic 05.30.20.1 

ERROR 154 

Overflow check reset failed (Sector Op). Gee Note. 
See logic 05.30.20.1 

ERROR 155 

WLR/RBC reset failed (Sector Op). See Note. 
See logic 05.30.20.1 



NOTE? Turn Switch I on and push Start Key for two instruction 

(Scop6 Loop) Scope Loop. 



DT 0023 
PN 217366 
EC 412351 



ERROR 160 



The file failed to read gaoo . ti v ^^^^ . 

shows that 2 or more ol the 10 J^/Vt? neaos i,.^^ ^ »'"&«^*er 
any data and the remaining heads had parities* fwm Switch I 
on and push start key for Scope Loop. 
Check for the following error conditions: 

!• Read oscillator running continuously -C2. 3 3. 2 0,1 

2. I/A record gate on solid -05.22,50^ 
If failure Is neither of the above items Branch to REF D. 

See REF E for detailed explanation ol Head Map. 

ERROR 161 



Miscellaneous read failure pattern. Push start key. If this error 
types again start test over. Failure should fall out under different 
error number with high probability. 



ERROR 162 



The Head Map shows that 2 or more of the 10 fi/W heads failed to 
transfer any data and the remaining heads read good data (no 
parities). This indicates a Head Address Register failure. 
Compare the Head Map typed out to the statements below: 

HEAD MAP CIRCUIT FAILURE 



1. 0@2245@779 Solid HAR Not 2 Bit 

2. @323@@878@ Solid HAR 4 Bit 

3. 10@1456@69 Solid HAR Not 4 Bit 

4. 00@@455@@9 Solid HAR 8 Bit 

5 . 0123@5678@ Solid HAR Not 8 Bit 

See logic pages 05,25.30,1, 05.25.40.1 and ILD pages 
06.03 and 06.04. 

Push Start Key. The typewriter will ask to loop on a 
single head or all heads. Turn Switch 1 on. Insert 
the desired head selection character. Type RS. Scope 
the failing circuit. If Switch I is off the typewriter 
will type the address and first part of the data read. 
Turn Switch 2 on to exit from loop. 
See REF E for detailed explanation of Head Map* 



ERROR 163 



File failed to read correctly (parity) from one head. All other heads 
read correctly. Branch back to beginning of test (005 00) . If 
trouble appears solid, bring in the second core load (Branch to 00532) , 
(This will rewrite the addresses and data on Track 3.) 

(Continued) 
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After test is i^ompie^: fed;:, m^- ) r-- ■ ^.'^-'^^ b^^^^i wm:i<- 

test over* It trouDie iaiis to is.ppmxo ^:^A^''pi:t:i ted a^iiia lae 
pack (cause unknown); if trouble pers I the disk pack may be 
damaged - change disk packs. 

If DT 0023 has never been run on this pack^ errors may occur 
on the first pass of the diagnostic - possible cause - bad 
data on cylinder 03, 

ERROR 164 



File failed to read sequentially from heads 9-0. 

Head Addr. Register (HAR) or HAR decoding circuit is failing. 

Compare the Head map typeout with the failure maps shown below. 

example: head MAPS CIRCUIT FAILURE 

1. 5678956789 Solid HAR 1 Bit 

2. 0123401234 Solid HAR Not 1 Bit 

3. 0133056885 Solid HAR 2 Bit 

Push Start key. The typewriter will ask to loop on a single head 
or all heads. Turn switch I on. Insert the desired head 
selection character. Type RS. Scope failing circuit. If switch 

1 is not turned on, the typewriter will type the address and 
the first part of the data read. Turn Switch 2 on to Exit from loop. 
See logic pages 05.25.30.1, 05.25.40.1 and ILD pages 
06.03 and 06.04. 

See REF E for detailed explanation of Head Map. 
ERROR 165 

File failed to Read (transfer any data) from one head - all others OK. 
The Head map typeout indicates the failing head position with an @, 
Press 1620 start key to put program into a diagnostic loop which will 
select and read from the failing head. Turn Switch 2 on to exit from 
loop. 

See REF E for detailed explanation of Head map. 

ERROR 166 

R/W heads failed to load to the disk surface 15 sec* after the 1311 
start/stop switch was turned on. This normally takes place during 
the ppwer-on seek. 

Possible cause: Latch magnet not energized or excessive "slop" in 
the head loading linkage. 

See logic C2. 13* 10 a 
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The carriage failed to Seek to csfltndar Ci;-;; . tm-'i^f o^a BwU&h I mmi 
push start key for scope loop* 
Check following possible causes^ 

1. No Set counter 1-2 or 2-4 pulse -05 ,15. 30.1 

2. No gate MAR to MUC -05.15,10.1 

3. No home Seek gate -05.07.20.1 

ERROR 168 

The machine is unable to decode the address read from disk. This 
Is probably caused by incorrect read format. 

Press start key. The typewriter will ask to loop on a single head 
or all heads. Insert the desired head selection character. Type Rs. 
If Switch 1 is off, the typewriter will output the first part of the 
data read; If Switch 1 is on, error typeouts are bypassed. Scope 
the failing circuit. 

EXAMPLE HEAD MAP CIRCUIT FAILURE 

3333333333 Missing Set Counter 4-8 pulse 

(logic 05.15.30.1) 



See Ref E f or detailed explanation of head map. 
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ERROR UP 

Write Erase circuit turned on Select 'yy*rk , Vt^.nl^ce the «ard pulled 
at BiB13. Scope as noted beiow. 

ERROR 171 

Read and Write gate "And" turned on Seiect Lock, Replace the 
card pulled at BiC09. Scope as noted below. 

ERROR 172 

AC- DC Safety circuit turned on Select Lock, Replace the card 
pulled at B1C06 and scope the failing circuit in the DC (CPU not 
running) condition. After correcting trouble, push start key to 
continue . 

ERROR 173 

Multiple Modules Selected turned on Select Lock, Refer to 
Module Select Lock map at Ref R= 



NOTE: 1. First core load: no scoping loop is provided. 

(Scoping loop) Scope the failing circuit in the DC condition. 

After correcting trouble, push start key to 

continue, 

2. Second core load: push start key for scoping loop. 
After correcting trouble, turn switch 2 on to exit 
from loop. 
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ERROR 180 



Index is failing to come up. 

See logic 05.21.10.1 

Check jumper location. (A misplaced jumper will also 
cause this error) 

ERROR 181 

Disk array is running too slow. Check for bad spindle bearings, 
slipping belt or dragging brake. Check frequency of the input 
power. Note that motor may be 50 or 60 cycle - be sure that 
proper pulley is used for the input frequency. 

ERROR 182 

IDisk array is running too fast. Check frequency of input power. 
Note that motor may be 50 or 60 cycle - be sure that proper pulley 
is used for the input frequency. 
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ERROR 200 

Machine failed to Exit from a Write sector operation (Sector 
count = 000.) See Note. 

See logic 05.07.30.1 and n.D page 04.02 

ERROR 201 

Machine failed to Exit from a Write Op. with an Address Check. 
See Note. 

See logic 05.07.30.1 and ILD page 04.02. 

ERROR 202 

Machine failed to Exit from a Write track Op. See Note. 

See logic 05 . 07 . 30 . 1 and !LD page 04 . 02 

ERROR 203 

Machine failed to Exit from a RBC full track Op. See Note. 
See logic 05.07.30.1 and ILD page 04.02 

ERROR 204 

Machine failed to Exit from a Read Full track Op. with WLR checking. 
See Note. 

See logic 05.07.30.1 and ILD page 04.02 

A two instruction routine following each of the above errors 
is built into the program to allow repeating the failing 
Instruction. Push the start key to enter this routine. Because 
all of the above errors are hang up type errors, it will be necessary 
to push the Reset and Release keys simultanously, then the 
Start or Single cycle key to repeat this loop. To redevelop 
error, turn on Switch 2 • 



NOTE: 
(Diagnostic 
Loop) 
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ERROR ^I0 

. One or more bit lines in the write traBsslator is - ? '^^^Vi'Bt:^^ 
The CPU attempted to write only the Sj and 83 on ^ s'- .^ending ■ 
8/4 bits (^) to the file. This combination is blocked by the 
write translator and normally sets no bits in FBR. Any bit 
erroneously set into FBR will be written on disk (possibly, along 
with the 8/4 bits should this combination fail to be blocked). 
Note* on the Read Op. the no bit combination from disk is 
converted back to an 8/4 ij^) by the Read translator. 

if the read field consists of variable, valid data, then the write 
operation must have failed to write on disk. 

The typewriter will ask for a character which will be written on 
diek and read back to assist in diagnosing the failure. To 
is^olate the trouble, analyze the bit configuration of the read 
field typed out. 
For a Scope Loop: 

1 . Turn on Switch I . 

2 . Type digit which the program will attempt to write and read. 

3. ' Type RS. 

4. To type in new digit, turn Switch 1 off, 

5. To exit from routine turn Switch 2 on. Type RS. 

See logic 05.11.10.1 

ERROR 211 

Writing even parity failed to turn-on Write Parity check. Turn on 
Switch #1 to enter write loop . Push start key. 
See logic 05.30.30.1 

ERROR 212 

Reading even parity failed to turn on Read Parity check. Turn on 
Switch #1 to enter read loop. Push start key. 
See logic 05.30.30.1 

ERROR 213 

Even serial FBR data picked up a bit writing blanks (S^ & S2) 
on disk. Error bit is typed out. Typewriter will call for a test 
digit to help diagnose the trouble. For scope loop turn on Switch 1, 
enter Digit, RS. The program will attempt to write then read that 
digit. To enter new digit, turn off Switch 1. To exit from routine 
turn Switch 2 on. 

See logic 05.12.80.1 

ERROR 214 

Odd serial FBR data picked up a bit while writing blanks (Si & S2} 
on disk. Error bit is typed out. Typewriter will call for a test 
digit to help diagnose the trouble. For scope loop turn on Switch I, 
enter Digit , RS . The program will attempt to write then read that 
digit * To enter hew digit, turn off Switch I , To exit from routine 
turn Switch 2 on. Type RS. 

See logic 05.12.80.1 
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ERROR 220 

An error occurred during write data transfer. The matrix typeout 
(See example below) summarizes the errors occurring during a Write 
track. Read track, and Compare loop. This routine writes nine 
2100 character records; each record consisting of one of the charac- 
ters shown in line 1 below. The data is read back and compared to write data. 

Wr/Rd Data Transfer 
(Error Matrix) 

12M80t*il$ Line 1 = data written and read 

of write checks (W) 
of Even Parities (MBR E) 
of Odd Parities (MBR O) 
of Read checks (R) 
of Compares (X) 

= 1 
= 0 
= 1 

Legend: 

0 = Correct Operation 

1 = A check, parity, or unequal compare in CPU. 

2 = Compare operation omitted. 

After typing out the error matrix, the typewriter asks for a test 
digit. Key in one digit and press the release/start key. The 
machine will now generate a 2100 character record from the digit 
keyed in. Write track and Read track (Hd.O). The first part of the data is 
then typed out(See example below) to assist in diagnosing the problem. 

EXAMPLE 

KEY IN WR-RD DIGIT IRS 
08252 EVEN ODD RD CK WTN 11 RTN 
8 

KEY IN WR-RD DIGIT 2RS 
08252 EVEN ODD RD CK WTN 22 RTN 

KEY IN WR-RD DIGIT 4RS 
08252 EVEN ODD RD CK WTN RTN 
5 ' 

KEY IN WR-RD DIGIT 8 RS 
08252 EVEN ODD RD CK WTN 88 RTN 



(Continued) 



EXAMPLE 



W 000000000 
E 011111001 
0 011111001 
R 011111011 
X 022221111 



Line 
Line 
Line 
Line 
Line 



summary 
summary 
summary 
summary 
summary 



Errors when data 
Errors when data 
Errors when data 



111118888888888888888888888888888888888 

22222^ 4^ ^^^ ^ ^ 4^ ^ ^^^^^^ » ^ ^^^ ^ ^ ^M ^ ^ ^ ^^ ^^ ^ ^^^ 

88888^EiaarirHrjQqripriqQaQqQQi4t{qiiQiiqqQQr|Eiii 
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ERROR 220 {Continued) 



In this example 4 different test digits were keyed in (one at a time), 
I, 2, 4 and 8. The output shows that only the first five characters 
of each record were written and read back correctly; this corresponds 
to the five characters placed in the address location. The failure 
seen here apparently is caused by losing format control after the l/A, 
thus the record (and record AGG) are incorrect. If your typeout 
matches this example, check for a missing "set counter 16-20" pulse. 

Scope Loop: 

1. Turn on Switch 1. 

2. Type digit which program will attempt to v/rite then read. 

3. Type RS. 

4. To enter new digit, turn switch I off. 
To exit from this loop turn switch 2 on. 



See logic 05.15.30.1 



Character Coding: 



1620 Write Xlator -*-1311 



^ Read Xlator 



1620 



C 
F 



C82 
882- 
.A82- 



C 
F 

C82 (:|:) 

F82 (J) 

.C84 

JP84 



C82 (+) 
P82 (+) 
'C84 — 
'F84 — 



CBA8^ 



C 
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03.22 
ERROR 230 



One or more heads failed to write correctly. 

Scope Loop: 

1. Turn on Switch 1. 

2, Push Start Key. 



See logic 02 . 30 • 05 . 1 
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ERROR 240 



■Read- Back Check indicator was tmnfi^i w« biw - ^ ^ • 
equal {Rd/Wr data compared equal in 1620 core kr ^h<si 
transfer routine). 

' Check for compare latch failing to set or failure of 13U compare 
' "And" circuits . See Note 
V See logic 05.21.30,1 

ERROR 241 

WLR/RBC indicator (37) failed to turn on with either a Wrong 
Length Record or Read Back Check error. 
Check for a solid WLR/RBC reset. See note. 
See logic 05,30.20 

ERROR 242 

RBC indicator (37) failed to turn on in a Read Back Check operation 
with unequal data . See Note, 

See logic 05.21,30,1 

Aliso, the RBC Op. may be terminating too early (before any unequal 
4ata is compared). 

Xheck for a missing pulse, set counter 64''80. 
See logic 05.15.30.1 



NOTE: 1* Turn on Switch I. 

(Scope Loop) 2. Push Start Key. 
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ERROR '2 5 1 . 

Address cheek occim^-ui oif^ mm 
Check the following possible cayse&i 

1. No counter 000 through 004 gate MM, 

2 . I/A gate falling to turn off 

3 . No compare sample gate 
4 • l/A skip check latch ON solid 

ERROR 252 

Failed to transfer one complete record (100 characters) 
on a Sector Read Op. (Data Is located at 15000 in core). 
The operation may be terminating early because counter 000 
comes up too soon during the record. 

Check for missing pulse on "set counter 32-40" or "set counter 
64-80". See Note. 

See logic 05.15.30.1 
Also check for transferring more than one sector. 

ERROR 253 

Pile encountered an incorrect address on a Sector Read Op. , 
but failed to give a "No address compare" error. See Note. 
See logic 05.21.30.1 

ERROR 254 

Address check occurred in a 21 sector Read operation. Scope 
output of high level amplifier. See Note. 
See logic 02.33,20.1 

ERROR 255 

Failed to transfer 21 complete records on a 21 sector Read Operation. 
Scope output of high level amplifier. See Note. 
See logic C2. 33. 20.1 

ERROR^256 

Address compare occurred in a 21 sector Read operation. Addresses 
should be 00600 through 00621. Scope output of high level amplifier. 
See Note. 

See logic 02. 33. 20. 1 

NOTE: 1. Turn on Switch 1. 

(Scope Loop) 2. Push Start Key. 

DT 0023 
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-05 as. 60. 1 
-OS. IS. 70.1 
-05.21. 30.1 
-05.21. 30.1 



ERROK2oO 

jCarriage failed to detent on a Seek operation* rreas l^il Start/Sl© 
to reset the carriage* Press Start to redevelop ermto Scope the 
failing circuit, 

ERROR 261 

Check to see if the carriage is at cylinder 010. If it is* this 
indicates that the CPU cannot Indirect address the P- field of 
a Seek instruction; if it is not, the carriage failed to seek 
correctly. (The program checks the CPU for indirect addressing 
and will not use the feature if it is not installed.) 

ERROR 262 

The carriage failed to seek to the correct cylinder. The typeout 
indicates the cylinder used in the Disk Control Field as well 
as the cylinder (decoded) where the carriage actually detented. 
Push start key to redevelop error. 
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ERROR 270 

Group Mark latch iaiSed io lUva ■■■^v m ^ifm^p msak 
read from disk. See Mote, 

See logic 05 .30. 10 a 

ERROR 271 

Group mark latch failed to turn on with an odd group mark 
read from disk. See Note. 

See logic 05.30.10.1 

ERROR 272 

End of Record Group Mark failed to come on. See Note. 
See logic 05.30.10.1 

ERROR 273 

WLR/RBC reset failed with late cycle Group mark (Sector Op. 
with WLR check). Check for solid EOR group mark. See Note. 
See logic 05.30.20.1 

ERROR 274 

WLR/RBC reset failed (RBC Op. with correct data). See Note. 
See logic 05.30.20.1 



NOTE: 1. Turn on Switch 1. 

(Scope Loop) 2, Push Start Key. 

3 .Switch 2 on redevelopes error. 
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ERROR 280 



Address check failed to tmn on wnk i '^^^tin r ^<^^' . 
..(cylinder 03).. Check for solid Addre&fe Ohecc rc».-c ?se 
See logic 05.30,10.1 

ERROR 281 

Address check failed to turn on the Any Disk Check indicator (39) . 
See Note . See logic 01 . 05 . 17 . 1 

ERROR 2 82 

Overflow indicator (38) failed to turn on. Check for erroneous 
cylinder overflow reset. See Note. 

See logic 05.30.10.1 

ERROR 283 

Overflow check failed to turn on the Any Disk Check indicator (39). 
See Note. 

See logic 01.25.17.1 

ERROR 284 

WLR/RBC Indicator (37) failed to turn on. 
See Note. 

See logic 05,30.10.1 

ERROR 285 

WLR/RBC failed to turn on the Any Disk Check indicator (39). 
See Note. 

See logic 01.25.17.1 

ERROR 286 

WLR/RBC indicator (37) failed to bring up RBC. 
See Note. 

See logic 05.30,20,1 

ERROR 287 

Any Disk Check Indicator (39) failed to turn on the Any Data 
Indicator (19). (Address check was used to set Any Disk Check). 
See Note, 

See logic 91,25.30,1 

NOTEt 1. Turn on Switch I, 

(Scope Loop) 2. Push Starl Key, 
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ERROR 290 



MAR 8 bit 10 THOU latch failed to imn on, 
See logic 05.06.30.1 



NOTE: , 1. Push Start Key (Machine will again hang up). 

(Scope Loop) 2. Push Reset and Release simultaneously^ then 

start. ERR will again typeout. 
3. Repeat above steps to redevelope error. 

(Switch 1 on Bypasses ERR Typeout) 
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THIS PROGRAM CHECKS THE IBM 1311 DISK 
STORAGE DRIVE*H00E(. 3 AS ATTACHED 
TO THE IBM 1620 MOD ONE ONLY 

ASSUMPTIONS- 

THIS PROGRAM ASSUMES THAT THE BASIC 
1620 CPU IS OPERATING PROPERLY AND 
THAT THE USER IS FAMILIAR WITH THE 
1311 DISK STORAGE DRIVE* 

SCOPE- 

THIS TEST IS DESIGNED TO DETECT AND 

ISOLATE MALFUNCTIONS IN THE OPERATION 

AND CONTROL OF THE 1311 DISK STORAGE DRIVE* 
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34 03560 


00701 


00740* 














00750* 














00760 SCI 


BTM 


SRESET.»» 


RESET READ AREA 


00836 


17 01140 


-0000 


00770 


BTM 


RSTIND»»* 


RESET IND 


00846 


17 02904 


-0000 


00780* 


READ TRACICfSUPER SECTOR 130 CHAR 








00790 


CM 


*-l-ll*09l09 


TURN ON E/2 


00860 


14 00071 


000-0 


00800 


RTN 


CYL3 




00872 


36 03560 


00706 


00810 


BE 


*432»»» 


E/2 ON » EXIT OK 


00684 


46 00916 


01200 


00820 


BTM 


£RRN*030f« 


60 TYPE ERROR 


00896 


17 03220 


-0030 


00830 


B7 


*-60 




00908 


49 00646 


00000 


00840* 


IF 


SW 1 IS ONfLOOP 


READ TRACK 








00850 


BCl 


SCl»»f 


SW 1 OFF/ON FOR tRACE 


00916 


46 00836 


00100 


00060 


RCTY 






00928 


34 00000 


00102 


00870 


BTM 


SDUMP»»« 


60 DUMP TRACE DATA 


00940 


17 01036 


-ooop 


00880 


BTM 


INDRST 




00952 


17 02904 


-0000 


00890 


RCTY 






00964 


34 00000 


00102 


00900 


WATY 


GRIDt»» 


TYPE GRID 


00976 


39 01227 


00100 


00910 


BNC2 


SCl«tf 




00968 


47 00636 


00200 


00920 


BTM 


REFN*699lO» 


60 TYPE REF I 


01000 


17 03164 


00009 


00930 


H 






01012 


48 00000 


00000 


00940 RCONST 


DC 


06»011160»* 




01023 


00006 




00950 


87 


START 




01024 


49 03616 


00000 


009*10* 


DUMP 140 CHAR READ 








00970 


DS 


5 




01035 


00005 




OO^iO SDUWP 


TFM 


*+30#19860 




01036 


16 01066 


J9660 


00990 


TFM 


*+23fRDAREA'«'2 




01046 


16 01071 


J5002 


0|O0@ 


TD 


99999 • 99999 t» 


MOVE DATA 


01060 


25 99999 


99999 



DT 0023 
PN 2172366 
EC 412531 " 



05.03 



OlOlO 


AM 


*-6»01»10 




01072 


11 01066 


000-1 


01020 


AM 


*-l3»0l»10 




01084 


11 01071 


000-1 


01030 


CM 


*'30«20000»t 


CHK DONE 


01096 


14 01066 


KOOdO 


01040 


BNE 


*-48 




01108 


47 01060 


01200 


01050 


DNTY 


19860 




01120 


35 19860 


00100 


01060 


BB2 






01132 


42 00000 


00000 


01070* 


RESET READ AREA 










01060 


05 


5 




01138 


00005 




01090 SRESET 


TFM 


*4.ie»RDAREA'«'9 




01140 


16 01158 


J50C9 


01100 


TF 


99999«ZER010»* 


MOVE 0-S TO READ 


AREA 01152 


26 99999 


02897 


OHIO 


AH 


*-6 tlO 




01164 


11 01158 


-0010 


01120 


CM 


*-18tl9999»»» 


CHK RESET DONE 


01176 


14 01158 


J99^9 


01130 


Bt 


*+12»1600 




01188 


46 01200 


01600 


01140 


61 


*+12»1700 




01200 


46 01212 


01700 


01150 


6NE 


SRESET+12 




01212 


47 01152 


01200 


01160 


B82 






01224 


42 00000 


OUOOO 


01170* 














01180* 


DATA FOR SCAN ROUTINE 










01190* 














01200 SCOMP 


OS 


»19930 




19930 


00000 




01210 GRID 


DAC 


40ff t 


I 1 


I 














01227 


00080 




01220 


DAC 


31* I 


I l» 


01307 


00062 




01230* 














01240* 




READ OSCILLATOR ADJUSTMENT 








01250* 














01260* 


CLOCK DRIVE RUNS RD/WR 


OSC 








01270* 


OSC 


; RUNS BIT RING ( 10 


BIT MODE ) 








01280* 


BIT 


RING RUNS MUC ( SI 


PULSES 1 








01290* 


MUC 


ZERO TURNS ON 1620 


READ CHK 








01300* 














01310 RDOSC 


TFM 


RSTRT4-6**»t 


LOAD RESTART 


01368 


16 00408 


-1368 


01320 


8TM 


REFN»48«10» 


GO TYPE REF H 


01380 


17 03164 


000M6 


01330 


RCTY 






01392 


34 00000 


00102 


01340 


WATY 


0SCT2 




01404 


39 01969 


00100 


01350 


M 






01416 


48 00000 


00000 


01360 MtNCNT 


DC 


03»0«*«7 




01420 


00003 




01370 MAXCHT 


DC 


06»0»»«1 




01426 


00006 




01380* 


CHECK RD CHK WILL TURN 


ON AND OFF 








01390* 


ALSO SYNC PROGRAM WITH 


FILE CLOCK 








01400 ST05C 


MM 


*'(>9»01t810» 


RESET FILE 


01428 


13 01437 


0-0-1 


01410 


Bl 


♦4.12»600»t 


TURN OFF RD CK 


01440 


46 01452 


00600 


01420 


TR 


OOlOOvOOlOOti 


TIME 


01452 


31 00100 


00100 


01430 


TR 


00100«00100»» 


DELAY 


01464 


31 00100 


00100 


01440 


BI 


*'|.56»S00»» 


CHK FOR MUC ZERO 


01476 


46 01532 


00600 


01450 


BTM 


ERRN*020ff 


GO TYPE ERROR 


01488 


17 03220 


-0020 


01460 


NO^ 






01500 


41 00000 


00000 


01470 


HOP 






01512 


41 00000 


00000 


01480 

01490* 


Bl 


STOSC 




01524 


49 01428 


00000 


01500 


BI 


^4>I2»600»«» 


TURN OFF m CK 


01532 


46 01544 





m 

PN 
EC 



0023 

2172366 

412531 



01510 


mi 


^ci 


tm r< 








00600 


01520 


mi 


^ci 






47 




C0600 


01530 


BTH 


£RRN«02I»» 


60. TY^E tMmn 


OlSi® 


17 


0322© 


-0021 


01540 


HOP 






Qimo 


41 


00000 


00000 


01550 


HOP 






01392 


41 


00000 


00000 


01560 


B7 


STOSC 




01604 


49 


01428 


00000 


01570* 


SYNC PROGRAM WITH DISK 


CLOCK 










01580 net 


TFM 


OVFLO»0,9 




01612 


16 


01906 


00-00 


01590 


TFM 


MINCNTfOtlOf 


iNITIAtlZF. 


01624 


16 


014^50 


000-0 


01600 


TFM 


MAXCNT*Q*8 




01636 


16 


01426 


0-000 


01610 


BKI 


*i600»» 


SYNC PROGRAM 


01648 


47 


01648 


00600 


01620# 
















01630 


BN! 


**24»600 




01660 


47 


OI6i4 


00600 


01640 


AM 


MINCNT»01»10 




01672 


11 




900-1 


01650 


AM 


MAXCNT»01»10» 


IDLE CNTR 


016S4 


11 


01426 


000-1 


01660 


BNI 


*«12f600 




01696 


47 


01684 


00600 


01670 


AM 


0VFt0»0l»9# 


DONE CNTR 


01708 


11 


01906 


00-01 


01680 


6NV 


♦-60 




01720 


47 


01660 


01400 


01690» 


COMPUTE 1/FREQ # LENr,TH OF EACH BIT 










01 TOO «C2 


MM 


MiNCNTsOTflO 




01732 


13 


01420 


000-7 


01710 


TF 


0SCWA»99 




01744 


^6 


01959 


00099 


01720 RC3 


MM 


MAXCNTtlTaO 




01756 


13 


01426 


000J7 


01730 


A 


99«0SCWA9» 


COMPUTE LENGTH 


01768 


21 


00099 


01959 


01740 RC4 


AM 


99*109a5f * 


OF EACH BIT 


01180 


11 


00099 


J89e5 


01750 


TF 


0SCWA«.99 




01792 


26 


01959 


00099 


01760 


M 


OSCWA9OSCONT 




01604 


23 


01959 


02169 


01770 


AM 


95*05*10, 


ROUND OFF 


01816 


11 


00095 


000-5 


017«0 


TO 


BUNGTH+00»90 




01828 


25 


02097 


00090 


01790 


TD 


BLNGTH4'04t91 




01840 


25 


02101 


00091 


01000 


TO 


BLN6TH4'06»92»» 


MOVE DIGITS TO 0/P 


01852 


25 


02103 


00092 


01810 


TD 


BtN6TH-*-08*93 




01664 


25 


02105 


00093 


01820 


TD 


BtNGTH+10»94 




01876 


25 


02107 


00094 


01830 


BCl 


»'«>36 




01688 


46 


01924 


00100 


01840 


RCTY 






01900 


34 


00000 


00102 


01B30 OVFtO 


DC 


04tOs»-5 




Q1906 


00004 




01860 


^ATY 


BLN6TH 




01912 


39 


02097 


00100 


01170 


BMC2 


STOSC 




01924 


47 


01428 


00200 


018S0 


BTM 


REFN969»10» 


GO TYPE REF 2 


01936 


17 


03164 


00009 


01890 


H 






01948 


48 


00000 


00000 


OlfOO OSCWA 


DC 


O09O»» 




01959 


00008 




01910 


B7 


SCANl 




01960 


49 


00776 


00000 


01920* 


' DATA AND CONSTANTS 












01930 0SCT2 


OAC 


45«BIT LNGTH SHD &£ 


l«429S US« (MAX » 


1*4310 US) 














01969 


00090 




01940 


DAC 


19» IMIN » 1«42B0 U$}« 


02059 


00038 




01950 BLN6TH 


OAC 


Q7fl»4399t 




02097 


00014 




01960 TVBR 


:0AC 


4»SENT 




02UI 


00008 




01f70 TYBRl 


OAC 


06f 99 ADV« 




02119 


00026 




01980* 
















01f90* ■. 




BIT RING TEST 










02000* 

















DT 0023 
PN 2172366 
EC 412531 



05,05 



02020* SI Oiit S£ OF M^' ^ikl^vs f -■i-'- ^"'^'t- 

02030* • ymtom nmt^ um$ mE jim't'^m- 

02040* 



02050 




TFM 




LOAD RESTART MMi 




021 34 


16 


00408 


-2134 


02060 




BTM 


REFN»47tl0» 


60 TVPE REF © 




02:146 


17 


03164 


000M7 


02070 




M 








02158 


48 


00000 


00000 


02080 


OSCONT 


DC 


06t015625t* • 






02169 


00006 








TOW 


BRl+l f 1 • 9 


SET HOP TO NOP 




02170 


15 


02507 


00001 


02100 


BTBl 


TFM 


RCNT#000#t 


SET PRCG CNTR 




02182 


16 


00810 


-0000 


02110 




TFM 


ADVf0,9« 


RESET ADV CNTR 




02194 


16 


02517 


00-00 


02120 




MM 


♦'♦•9«1»810» 


RESET BIT RING 




02206 


13 


02215 


0^0-1 


02130 




BN! 


BRER1*600«« 


CHK FOR S2 « RESET OF 


RING 












BtM 








0221S 


47 




00600 


02140 


BTBZ 


PULSE •*#• 


60 SEND BIT RING 


ADV 


8 

02230 


17 


02862 


-2230 


02150 




BI 


•'»^12f600f f 


DUMMY TURN OFF 




02242 


46 


02254 


00600 


02160 




B.I 


6RER2e600» « 


CHK FOR NO SI OR 


S2 


02254 


46 


02682 


00600 


02170 




BTM 


PULSE»«» 9 


60 SEND BIT RiNG 


ADV 


4 

02266 


17 


02862 


-2266 


02180 




B.I 


BREK3*6009k 


CHK BIT STUCK ON 




02278 


46 


02706 


00600 


02190 




BTM 


PULSE •*» • 


GO SEND BIT RING 


ADV 


2 

02290 


17 


02862 


-2290 


02200 




BI 


BRER3»60099 


CHK BIT STUCK ON 




02302 


46 


02706 


00600 


02210 




BTM 


PULSE»*»» 


GO SEND BIT RING 


ADV 


i 












BI 








02314 


17 


02862 


-2314 


02220 




BRER3*600»» 


cm BIT STUCK ON 




02326 


46 


02706 


00600 


A 1 1 1S A 

02230 




BTM 


PULSEt*»t 


GO SEND BIT RING 


ADV 


Si 

02338 


17 


02862 


-2338 


02240 




BM! 


8RER4»600»» 


CHK SI TURNED ON 




02350 


47 


02790 


00600 


02250 




BTM 


PULSE •*» f 


GO SEND BIT RING 


ADV 


W 

02362 


17 


02862 


-2362 


02260 




BI 


**12960Q,, 


DUMMY TURr»« OFF 




02374 


46 


02306 


00600 


0 i J: 7 0 




BI 


BRER5 «6009 » 


CHK FOR ADV 




02386 


46 


02al4 


00600 


02280 




BTM 


PULSE»*»« 


GO SEND BIT RING 


ADV 


C 

^ "l *<k r'\ M 

02393 


17 


02862 


•2398 


02290 




BI 


BRER3*600«* 


CHK BIT STUCK ON 




02410 


46 


02706 


00600 


02300 




BTM 


PULS£f*ft» 


60 SEND BIT RING 


ADV 


b 

02422 


17 


02862 


-2422 


02310 






8RER3 »600«« 


CHK BIT STUCK ON 




02434 


46 


02706 


00600 


02320 




BTM 


PULSE t« to 


GO SEND BIT RING 


ADV 


A 

02446 


17 


02862 


-2446 


02330 




BI 


BRER3*600»« 


CHK BIT STUCK ON 




02458 


46 


02706 


00600 


02340 




BTM 


PULSE9*»» 


60 SEND SIT RING 


ADV 


S2 
02470 


17 


02862 


-2470 


02350 




BNI 


eRER6$600»« 


CHK S2 FLIPPING ON 


02482 


47 


02838 


yO600 


02360 




TFM 


ADV«0#9» 


RESET ADV CNTR 




02494 


16 


02517 


00-00 


02370 


8R1 


NOP 


BTBl 






02506 


41 


02182 


00000 


02380 


AOV 


DC 


03»0f*f 


ADVANCE CNTR 




02517 


00003 




02390 




AM 


RCNT»QI»10 






02513 


11 


00810 


OOO-l 


02400 




CM 


RCNTfOlOOit 


COUNT 0100 LOOPS 




02530 


14 


oosio 


«oioo 



or 0023 
PN 2172366 
EC 412531 



05«06 



02410 


BNE 


BTB2 










02420 


8C1 


BTBl 


02554 


46 


02 182 


00 100 


02430 


8C4 


BTBl-12 


02566 


46 


02170 


00400 


02440 BTa3 


fiTM 


REFN#69tlO# GO TYPE REF I 


M C J 1 VI 


17 






02450 


M 




y> & J 7 %! 








02460 


BC4 


RSTRT 


02602 


46 


00402 


00400 


02470 


87 


ROOSC 


02614 


49 


0136B 


00000 


02480* 


HO 


S2 ON BIT RING RESET 










02490 BREfll 


BTM 


ERRNiOlOff GO TYPE ERROR 


02622 


11 


0322Q 


*»00i0 


02500 


NOP 




02634 




V w w V* w 


nooon 


02510 


MM 


»+9»0l»810# RESET RING 


02646 


13 


02655 




02520 


8C1 


*-"l2 


02656 


46 


02646 

V fit w 


00100 


02530 


8 


8TBl-12t»» 


02670 


49 


02170 


ooono 

w V w 1,^ Vf 


02540# 


NO 


ADV «2>»0R SI OR S2 STUCK ON 










02550 Bntnz 


8TN 


ERRN^Ollo 60 TYPE ERROR 


02682 


17 


03220 


-0011 


02560 


B 


SRERR 


02694 


49 


02850 


00000 


02570* 


' BIT RING TRIG STUCK ON 










02580 BRER 3 


BTM 


ERRN»012»711#» 60 TYPE ERROR 


02706 


17 


03220 




02590 


8C1 


8RERR«ft 




46 


w « . w M 




02600 


TD 


TYBR1+2»ADV-1»* AND ADV CNTii 


05 730 


2*5i 


02121 


U P JR. W - 


02610 


TO 


TYBR144»ADV 








y ^ «9 4 ! 


02620 


WATY 


TYBRfft 


027S4 


39 

«>■ y 


02 111 




02630 


M 








www w 




02640 


B 


BRERR 


02778 


49 


02350 


00000 


02650* 


' NO 


ADV 131 *0P SI NOT TURNING ON 










02660 BRER4 


BTM 


ERR^»013*» GO TYPE ERROR 


02790 


IT 


03220 




02670 


B 


BRERR 


02802 

W dE» w w 


49 


02050 


ooono 


02680* 


' NO 


ADV CIWOR SI STUCK ON 










02690 SRtR5 


BTM 


ERRN»0l4f t GO TYPE ERROR 




17 


03220 




02700 


8 


BRERR 


02826 


49 


023 &0 


00000 


02710^ 


S2 


NOT FLIPPING ON 










02T20 BR£fl6 


BTM 


ERRN»015ff GO TYPE ERROR 




17 


03220 


vw A 3 


02730 SRERR 


87 


BTBl 


02850 


49 


02182 


00000 
www V 


02740* 














02750* 


THIS ROUTINE SENDS ONE BIT RING 










02760* 


ADVANCE AND AOOS I TO THE ADVANCE CNTR 










02770 


DS 


5 


02861 


00005 




02790 PULSE 


m 


ft4>9»04«810« MULT BY 4 • BIT RING 


ADV 










AM 




02062 


13 


02871 


0-0-4 


02790 


ADV«01«10» ADD TO ADVANCE CNTR 


02874 


li 


025i7 


OOO-l 


02800 


882 


*f« RETURN 


02886 


42 


00000 


oaooo 


02810* 












02820* 


ERROR ROUTINE FOR BIT RING 










02830* 














02840* 














02850* 














02860* 














02870* 


COMMON DATA AND ROUTINES BETWEEN 










02810* 


CORE LOAD i AND COtE LOAD 2 










02i9@# 














01900 2ER010 


DC 




02897 


00010 





or 0023 
PN 2172366 
EC 412531 



05.07 



02910* 
02920* 
02930« 
02940* 
02950* 
02960* 
02970* 



THIS SUBROUTINE RESETS ALL THE 
1620 ERROR INDICATORS* THE mW 
IS ENTERED VIA A BTM UTU 



02980 




OS 


5 




02902 


00005 




02990 


INDRST 


BI 


*+12»0600»» 


RD CK 


02904 


46 02916 


00600 


03000 




Bl 


*+12»0700f » 


WR CK 


02916 


46 029 2S 


00700 


03010 




BI 


♦+12tl600»t 


MBR-E 


02928 


46 02940 


01600 


03020 




91 


*'»-l2»1700»f 


M8R-0 


02940 


46 029112 


01700 


03030 




61 


*4l2»3600*t 


APRS CK 


02952 


46 02964 


03600 


03040 




BI 


♦♦i2t3700». 


RBC/WLR 


02964 


46 02976 


03700 


03050 




B! 


•4>12»3d00»« 


OVFLO CIC 


02976 


46 02986 


0380Q 


03060 




BB2 






02968 


42 00000 


00000 


03070 


RSTINO 


PS 


•INDRST 




02904 


00000 





03080* 
03090* 
03100* 
03110* 
03120* 
03130* 
03140 

03150 YESNO 

03160 

03170 

03180 
03190 
03200 M2 
03210 
03t20 MR 

03240 ANS 

03250* 

03260* 

03270* 

03280 

03290 TYPE 

03300 

03310 

03320 

03330 

03340 

03350* 

03360* 



YES - NO ANSWERING ROUTINE 
THE USER MUST TYPE 
Y ■ YES OR N » NO 
THEN RELEASE AND START 



DS 


5 




02994 


00005 




TF 


M24-6»*-l»» 


INIT 


02996 


26 03062 


02995 


TF 


MR4.6»*-13»» 


lALUE 


03008 


26 03076 


02995 


RATY 


ANSt«» 


ACCEPT ANSWER 


0302Q 


37 03085 


00100 


CM 


ANSf68ftl0« 


CHK FOR YES 


03032 


14 03085 


00008 


BE 


MR 




Q3044 


46 03070 


01200 


TDM 


99999»0»t 


INSERT 0 


03056 


15 99999 


00000 


BB2 






03068 


42 00000 


00000 


TO 


99999 tRNvi 


INSERT RM 


03070 


25 99999 


03545 


BB2 


« » • 


RETURN 


03082 


42 00000 


00000 


DAC 


03»XXX 




03085 


00006 




GENERAL OUTPUT 


ROUTINE FOR TYPING - ADDRESS 


AND MESSAGES 




DS 


5 




030 4 


00005 




BI 


*+60»00300»»» BYPASS NORM TYPE OUT FOR 


LOOP 







RCTY 

WNTY RSTRT+2f»» 

TF *+18»TYPE-l 
WATY 99999* *• 
BB2 



03096 46 03156 00300 
0310e 3^ 00000 00102 
TYPE ROUTINE LOCATION 03120 36 00404 OOlOO 

01132 26 03150 03095 
03144 39 99999 00100 
031156 42 00000 00000 



TYPE MESSAGE 



03380* 
03390* 
03400* 



REFERENCE NUMBER 
THIS ROUTINE TYPES THE REFERENCE NUMBER. 
IT IS ENTERED VIA A BTM {17U 
THE Q-FIELO CONTAINS ALPHA CODE 



m 0023 
FN 2172366 
EC 412531 



03410 ' 














03420 HEfH 


RCTV 












03430 


WNTY 




TYPE ROUT wcmim 




00**04 




03440 


TF 


REF-ss-Ut^EFN-l . 




osiii 


03395 


■03163 


03450 


WATY 


R£F«»f 


TYPE REFERENCE, NOr 


03200 


39 03379 


00100 


03460 niFHl 


B82 






03212 


42 00000 


00000 


03470# 












03460» 




ERROR NUMBER 










03490* 


THIS ROUTINE TYPES THE 


ERROR NUMBERS* 








03500* 


IT 


IS ENTERED VIA A BTM (17). 








03510* 


THE Q-FIEtD CONTAINS THE ERROR CODE* 








03520* 














03530 


DS 


5 




03210 

w wl" fe« <fe V 


00005 




03540 ERR« 


SF 


RSTRT4-3 




03220 


32 00405 


00000 


03550 


0CI 


EftRNl 




03232 


46 03376 


00100 


03560 


RCTY 






03244 


34 OOOQO 


00102 


03570 NOWOD 


OC 


02«09«-»8 




03247 


00002 




03580 


BNF 


*4-36»ERRN-l 




03256 


44 03292 


03219 


03590 


TDM 


ERRNl-23*! 




03266 


15 03353 


00001 


03600 


CF 


ERRN*1 




03280 


33 03219 


00000 


03610 


WNTY 


R$TRT+2»»» 


TYPE ROUTINE LOC 


03292 


38 00404 


00100 


03620 


TO 


ERR+14«ERRN-3 




03304 


25 0341? 


03217 


03630 


TO 


ERR'»-16*ERRN~2»f • 


INSERT ERROR NO* 


03316 


25 03419 


03218 


03640 


TO 


ERR-f-lS^ERRN-I 




03328 


25 03421 


03219 


03650 


WATY 


ERR*f« 


TYPE EKROR NUNBER 


03340 


39 03403 


OOlQO 


03660 


H^ 






03352 

W »i? 46ct 


4B OQOOO 


QOOOO 


03670 nCHl 


DS 


»* 




03363 


00000 




036S0 


TDM 


»-ll*8 




03364 


15 0335^ 




03690 ERRMl 


BB2 






V J f Htf 




WW w 


03700 REF 


OAC 


12t - REF X • 




03379 


00024 


03710 ERR 


DAC 


13s - ERR 999 « 




03403 


00026 

W W w *e 'fcJ 




03720 EXIT 


DAC 


06» EX!T« 




03429 


00012 




03730 TS%»C31 


DAC 


31»ARE MEADS AT CYL 


03 » TYPE Y«N • 


03441 


00062 




03740 MBRE 


DAC 


06»EVEN * 




03503 


00012 




03750 H8R0 


DAC 


05 •ODD • 




03515 


00010 




03760 RDCK 


DAC 


07»RD CK « 




03525 


00014 




03770 PSW 


DS 


♦ REFN4-3 




03167 


00000 

V W V V V 




03780 


OC 


02»» 




03539 


00002 




03790 


DC 


Ol»» 




03540 


00001 




03800 


DC 


01»* 




03541 


00001 




03810 


DC 


01»« 




03542 


00001 




03620 


DC 


01»» 




03543 


00001 




OSiSO 


DC 


0l»« 




03544 


00001 




03840 RMRST 


OC 


01 ft 




03545 


00001 




03850 nn 


DS 


•RMRST 




03545 


00000 




03S60 CYtZ 


DOA 


«ltfl*RDAR£A 




03546 

0 3 ^ ^ 


00006 
00003 -0 


0000 

1 




D£»A 






. 03555 


00005 J5000 


03870 CYL3 


|lt780«209R0AR£A 




03560 


00006 1- 


0780 










03566 
03569 


00003 -20 
00005 J5000 



DT 0023 

,PM 2172366 
EC 412531 



05.09 



03680 AORSCK DUk - ^Id'f 1111 ^H^i^^Si^:^ OOiVOft ,U>7777 

Ii3&$3 00005 JSOOO 

03890 OCFSCO DOA tltt^RDAREA 03588 00006 1-0000 

Q359h 00003 -00 
03597 OOOCS* J5000 

03900 RESET DDA »l«SCTR^80000tO»ROAREA 03602 00006 IROOOO 

03603 00003 -00 
03611 OOOOH J5000 

03910* 

03920* CONTROL 
03930* 

039-iiO* THIS ROUTINE DOES THE FOtLOWING- 

03950* TYPES THE TEST NAME 

03960* TYPES SWITCH SETTINGS 

03970* TYPES PERTINENT OPERATING INSTRUCTIONS 

03980* ALLOWS THE KEYING IN OF ESSENTIAL INFORMATION 

03990* 



04000 START 


TFM 


RSTRT'»-6»*»» 


LOAD RESTART ADRS 


03616 


16 


00408 


-3616 


04010 


RCTY 






03628 


34 


00000 


00102 


04020 


RCTY 






03640 


34 


00000 


00102 


04030 


WATY 


TSTNAMf t* 


TYPE TEST NAME 


03652 


39 


04009 


00100 


04040 


RCTY 






03664 


34 


00000 


00102 


04050 


WATY 


SETSWfff 


TYPE SW SETTINGS 


03676 


39 


04051 


OOlOQ 


04060* 
















04070* 


REQUEST AND ACCEPT 


MODULE NU^iBER - 










04080* 
















04090 


RCTY 






03688 


34 


00000 


00102 


04100 


WATY 


ROTMN»*« 


REQUEST MOO N0« 


03700 


39 


04123 


00100 


04110 


RNTY 


NOMOD 




03712 


36 


03247 


00100 


04120 


8C4 


*-36» • » 


OOPS SW 


03724 


46 


03688 


00400 


04130 


RCTY 






03736 


34 


00000 


00102 


04140* 
















04190* 


COMPUTE DISK DRIVE 


DIGIT FROM MODULE N0» 










04160* 
















04170 


m 


NOHOD«02f 10* 


MULT BY 2 


03748 


13 


03247 


000-2 


04180 


AM 


99»01»l0t 


ADO 1 


03760 


11 


00099 


000-1 


04190 


TO 


00460»99«» 


PLACE 


03772 


25 


00460 


00099 


04200 


TD 


CYL2»99»» 


THE 


03704 


25 


03546 


00099 


04210 


TO 


CYL3»99»» 


DISK 


03796 


25 


03560 


00099 


04220 


TD 


A0RSCK»99.» 


DRIVE 


03808 


25 


03574 


00099 


04230 


TO 


OCFSCO • 99 ♦» 


DIGIT 


03020 


25 


03588 


00099 


04240 


TD 


DCFTK*99f • 


IN 


03832 


25 


06290 


00099 


04250 


TD 


6RDX4»9999 


EACH 


03844 


25 


100'«6 


00099 


04260 


TD 


CYL35»99»» 


DISK CONTROL 


FIELD 
03856 


25 


13252 


00099 



04270* 

04280* FIRST PASS ONLY 

04290* TYPE REFERENCE NUMBER <REF HQ) TO 

04300* FORCE USER TO GO TO DOCUMENTATION. 

04910* AFTER TYPING REF HO.tTHE CPU MILL 



m 0023 
PN 2172366 
EC 412531 



04330* 

04340* 

04350* 

04360 HQPl 

04370 

043S0* 

04390 600F 

04400 

04410 



HANG»U^ m§ THE USi 
TO FIND out HOW TO 



mm 
11 601 Na« 



04430* 

04440 

04450 

04460 

04470 

04480 CEOK 
04490 
04500* 
04910* 

04520* 

04930 TSTNAM 

04540 SETSU 

04550 RQTMN 

04560* 

04570* 

04590* 

04590* 

04600* 

04610* 



NOP RT02 






03i6E 

w «i» w \y 


41 


04 1 &(% 


00000 


BTM REFN»41»10 


» 60 TYPE REF 


A 


03dS© 


17 


03164 


OOOMl 


FORCE HANG-UP 


CONDITION 












TFW RSTRT+6** 






03892 


16 


00408 


-3892 


CM *'fllfO»iO» 


TURN ON E/2 


LATCH 


03904 


14 


03915 


000-0 


m CYt3»708»» 


ILLEGAL OP 


- SHOULD S 


TOP CLC 
03916 


)C K 
36 


03560 


00708 


BNE CEOK 






03928 


47 


03988 


01200 


E/Z TRIG ON - 


FAILED TO HANG-UP 












&TM ERRN»100»* 


TYPE ERROR 


HO* 100 


03940 


11 


03220 


-0100 


RN CYL3»708»«i 


DIAG* LOOP 




03952 


36 


03560 


00708 


8C1 **.12 






03964 


46 


03952 


00100 


B RSTRT 






03976 


49 


00402 


00000 


TOM N0Pl'».lt9f • 


CHANGE NOP 


TO B 


03988 


15 


03869 


00009 


B7 RT02 






64000 


49 


04136 


00000 



04630* 
04640* 
04650* 
04660* 



DATAfTYPEOUTStAND CONSTANTS 

DAC 21»DIAGN0ST!C TEST 0023 • 

DAC 36 » TURN ALL SWITCHES OFF OR TO PROGRAM* 

DAC 32flCEY IN MODULE NO* PACK IS ON • 



INDICATOR RESET 

THIS ROUTINE RESETS ALL THE 162C INDICATORS 
WITH A BI (46) INSTRUCTION AND CHECKS THAT 
THE DISK STORAGE INDICATORS- ADRS CHK (36)» 
WLR/RBC CHK (37) tOVFLO CHK ( 38) 9 AND ANY 
FILE CHK (39) AND WRITE CHECK (07) 
AND READ CHECK (06) ARE INDEED TURNED OFF* 



04009 00042 
04051 00072 
04123 00064 



04670 RT02 


TFM 


RSTRT'#'6»*#f 


LOAD RESTART 


ADRS 


04186 


16 


00408 


-4186 


04680 


BTM 


TYPE*221 •* 


TYPE FILE I NO RESET 


04198 


17 


03096 


-4^95 


04690 


BTM 


INDRSTt*** 


GO RESET I NO 




04210 


17 


02904 


-4210 


04700 


BNI 


*+36#03600«# 


ADRS CK 




04222 


47 


04258 


03600 


04710 


BTM 


ERRN»110»711»» 


60 TYPE ERROR 


110 


04234 


17 


03220 


-011- 


04720 


NOP 








04246 


41 


00000 


00000 


04730 


BNI 


*436»03700», 


WtR/R8C CK 




04258 


47 


04294 


03700 


04740 


BTM 


ERRN»111*711» 


GO TYPE ERROR 


111 


04270 


17 


03220 


-oilj 


04750 


NOP 








04282 


41 


00000 


00000 


04760 


BNI 


* •)-36f 03600* * 


OVFLO CK 




C *294 


47 


04330 


03600 


04T7O 
04780 


BTM 


ERRN«ll2«7|i» 


60 TYPE tmon 


112 


04306 


17 


03220 


-OllK 


NOP 








04318 


41 


00000 


00000 


04790 


BNI 


•>36»03900»» 


ANY FILE 




04330 


47 


04366 


03900 


04800 


BTM 


CRRN*li3*7li* 


60 TYPE ERROR 


113 


04342 


17 


03220 


-OllL 


04010 


NOP 








04354 


41 


00000 


00000 



m 0023 
PH 2172366 
EC 412531 



05.U 



04020 






REm0 tu: 






47 


G -'t <£ 


00600' 


04630 


BTM Emm, 11^^1119 










11 




-OllM 


04840 


NOP 








043 0 


41 


00000 


00000 


04850 


BMI *+36»700»» 




WRITE €K 




04402 


47 


04430 


00700 


04860 


8TM ERRN»115f7ll» 




GO TYPE ERROR 




04414 


17 


03220 


-OllN 


04870 


NOP 








04426 


4) 


00000 


00000 


04880 


BC4 RT02+24 








04438 


46 


04210 


00400 


04890 


BNF RT2B»RSTRT+3». 






04450 


44 


04506 


00405 


04900 


BCl *-f24»tt 








04462 


46 


04486 


00100 


04910 


H 








04474 


46 


00000 


00000 


04920 


BNC2 RT02-^24 








04486 


4? 


04210 


00200 


04930 


B7 RSTRT»»» 








04493 




00402 


QOOOO 


04940* 


















04950» 


















04960* 


THIS ROUTINE CHECKS 


THE BRANCH NO 












04970» 


GROUP MARtC INSTRUCTION { 8NG - 55 ) 












04980* • 


PHASE DATA 


BRANCH 












04990* 


A 


GM 


NO 












05000* 


B 


0 


YES 












05010* 


C 


7 


YES 












05020* 


0 


RM 


YES 












05030* 


















05040 RT2B 


TFM RSTftT-|.6«*»» 




LOAD RESTART 




04506 


16 


00406 


-4506 


05050 


BTM TYPE»ZZ2 •# 




TYPE BRCH HO 


GM 


04518 


17 


03096 


-4837 


05060 


TFM LPCT»0»10 








04530 


1 S 


00449 


000-0 


05070* 


PHASE A DATA « 


GM 


SHD NOT BRCH 












05080 R2A 


8NG *420fDATAA** 




OATAA « GM 




04542 


55 


04562 


00811 


05090 


B7 R2B 








04554 


49 


04586 


00000 


05100 


BTM ERRN»120»711« 




GO TYPE ERROR 


120 


04562 


17 


03220 


-012- 


05110 


NOP 








04574 


41 


00000 


00000 


oni^o* 


PHASE 6 DATA « 


0 


SHO BRCH 












05130 R2B 


5N6 *>36»DATAB»9 




DATAB • 0 




04586 


55 


04622 


04790- 


05140 


BTM ERRN»121t7llt 




GO TYPE ERROR 


121 


04598 


17 


03220 


-012J 


05150 


NOP 








04610 


41 


00000 


00000 


05160* 


PHASE C DATA • 


7 


SHD BRCH 












05170 R2C 


BNG *-».369DATACf • 




DATAC • 7 




04622 


55 


04658 


04791 


05180 


BTM £RRN*122»711f 




GO TYPE ERROR 


122 


04634 


17 


03220 


-012K 


05190 


NOP 








04646 


41 


00000 


00000 


05200* 


PHASE D DATA • 


RM 


SHD BRCH 












05210 R20 


BNG *4-36«0ATAD*t 




OAT AD « RM 




0465«^55 


04694 


04792 i 


05220 


BTM ERRN»123»71I« 




GO TYPE ERROR 


123 


04670 


17 


0S22O 


-012L 


05230 


NOP 








04682 


41 


00000 


00000 ^ 


05240* 


















05250 


AM LPCTfOl»lO 








04694 


11 


00449 


000-1 


05260 


BNV R2A9«« 




LOOP CNTRU 




04706 


47 


04542 


01400 


05270 


BC4 RT2B424 








04718 


46 


04530 


00400 


05280 


BNF RT03tRSTRT*S 








04730 


44 


04860 


00405 


05290 


BCl *424t»* 








04742 


46 


04766 


00100 


05300 


H 








04754 


43 


00000 


00000 


05310 


8NC2 «R2A»» 








04766 


47 


00000 


00242 


0§320 


B RT02»«* 








04778 


49 


04186 


00000 



or 0023 
PN 2172366 
EC 412531 



05330* 


































DATA 












U336U DAT Ad 


bsc 


ouo 




04790 


00001 




03370 OATAC 


DSC 


01 »7 




04791 


00001 




05380 DATAO 


PC 


Oltt 




04792 


00001 




05390 ZZl 


PAC 


21t-1620 FILE IND RES£T» 


04795 


00042 




05400 112 


DAC 


X2f-0RCH NO 6M« 




04837 


00024 




05410» 
















05420* 




I CYCLE 


ENTRY 










05430* 
















05440* 


THIS ROUTINE CHECKS 


THAT EACH DISK 










05450* 


INSTRUCTION Witt 6IVE A FILE EXIT 










05460* 


on 


I-CVCLE ENTfilY* 












05470* 
















05480 RT03 


TFM 


f?STRT+6»«*f 


LOAD RESTART ADRS 


04860 


16 


00408 


-4860 


05490 


BTM 


TYPE»2Z3 *• 


TYPE READ 1 -CYCLE ENTRY 
















04872 


17 


03096 


-6259 


ft ft K '\ A 


TFM 


LPCT*90«10 




04684 


16 


00449 


OOORO 


05510 Lrl 


CM 


*'mf0ti09 


TURN ON E/Z IND 


04696 


14 


04907 


000-0 


A ft 11 9 A 


RDN 


0CFSC0»t« 


READ DISK - SCTR CNT 


• 000 

04908 


36 


03588 


00702 


n K It 4 A 

O5530 


BNE 


»+44»»» 


E/Z ON « I -CYCLE ENTRY 








U 3 5^0 








04920 


47 


04964 


01200,. 


AM 


LPCT»01rlO»» 


LOOP CNTR 


04932 


11 


00449 


000-1 




BHV 


LPl 




04944 


47 


04896 


01400 


u J pel V 


87 


RT03B 




04956 


49 


05248 


00000 


A«tft7fttt 




OPERATION HUNG 


«UP 












BTM 


REFN942«10, 


60 TYPE REF 8 


04964 


17 


03164 


000M2 


05590 


H 






04976 


48 


00000 


00000 


U30UUW 


KEAD DISK WITH M0«8 


♦ SCTR CNT « 000 












GM 


♦♦llsOflOt 


TURN ON E/Z 


04988 


14 


04999 


000-0 


05620 


nn 


DCFSC0»708t« 


READ DISK MQ^8»SC«0 


05000 


36 


C3568 


00708 


05630 


BE 


RT03A2 




05012 


46 


05096 


01200 


05640 


BTM 


ERRNfl30»t 


GO TYPE ERROR 


05024 


17 


03220 


-0130 


0707U 


BTM 


REFN«69«10f 


60 TYPE REF Z 


05036 


17 


03164 


00009 


05660 


H 






05048 


48 


00000 


00000 


0 5© r U 


m 


DCFSC0»70St» 


READ DISK SC « 0*MQ 


« 6 
05060 


36 


03588 


00708 


A fi it 0 A 

05690 


8NC2 


*-12 




05072 


47 


05060 


00200 


05690 


8 


RSTRT 




05084 


49 


00402 


00000 


A S "9 A A M 

05700* 


READ DISK WITH»SCTR 


CNT » 000 










05710 RT03A2 


CM 


♦+ll»0»l0t 


TURN ON E/Z IND 


05096 


14 


05107 


000-0 


05720 


^DM 


DCFSC0»»» 


READ DISKfSCTR CNT » 


000 
















05108 


36 


03588 


00702 


05730 


BNE 


R3B»t« 


E/2 ON « I CYCLE 


05120 


47 


05176 


01200 


03740 


6tm 


ERRN»131»» 


00 TYPE ERROR 


05132 


17 


03220 


-0131 


05750 R3A 


BTM 


1?EFN»69»10» 


60 TYPE REF Z 


05144 


17 


03164 


00009 


05760 


H 






05156 


48 


00000 


00000 


05770 




R3B4>36 




05168 


49 


05212 


0000 Q 


05780 (t3B 




ERRN»132t» 


60 TYPE ERROR 


05176 


17 


03220 


«0132 



or 0023 
PN 2172366 
EC 412S31 



05.13 



05790 


BIN mi'n<?Q>9<n^ 






.t ? 




00009 


05800 


H 




US 100 


48 




00000 


0581C 


RDN DCFSCO 




05212 


36 




00702 


05820 


BNC2 ♦-12 




05224 


47 


05212 


0Q200 


05830 


a RSTRt 




05236 


49 


00402 


OQOOO 


05840* 














05850* 


SEEK I -CYCLE 


ENTRY CYLINDER 


03 








05860* 














05870 RT03B 


TFM RSTRT4-6**»ff 


LOAD RESTART 


05248 


16 


00408 


-5248 


05680 R301 


CM *+U»0»10f 


TURN ON E/2 IND 


05260 


14 


05271 


000-0 


05890 


SK CYL2»»»« 


SEEK CYL 00 


05272 


34 


03546 


00701 


05900 


BE RT03C»*» 


E/2 ON « I-CY 


05284 


46 


09344 


01200 


05910* 


SEEK OP HUNG-UP 












05920 


BTM ERRN»133«t 


GO TYPE ERROR 


05296 


17 


03220 


-0133 


05930 


SK CYtZ 




05303 


34 


03546 


00701 


05940 


BNC2 »-12 




05320 


47 


05308 


00200 


05950 


B RSTRT 




05332 


49 


00402 


00000 


05960* 














05970* 


CHECK FOR POSITIVE STOP ON SEEK 










09980* 














09990 RT03C 


CM «4^11»0tl0»» 


TURN ON E/Z 


05344 


14 


05355 


000-0 


06000 


RDN 0CFSC0«»» 


READ DISK HANG-UP " 


POSITIVE STO^ 










05336 


36 


03583 


00702 


06010 


BE RT030#»« 


STOP OR BUSY LATCH ON 














05368 


46 


05524 


01200 


06020* 


ASK IF POSITIVE STOP 












06030 


RCTY 




05380 


34 


00000 


CO 102 


06040 


WATY ASKCS»#» 


ASK USER IF POSITIVE 


STOP 














05392 


39 


06119 


00100 


06050 


BTM YESNOtCSSW»» 


GET ANSWER 


05404 


17 


02996 


-6256 


06060 


BNR R3C2»CSSM*« 


RM « YES POS STP 


05416 


45 


05476 


06256 


06070* 


HEADS AT POSITIVE STOP 












06080 


BTM ERRN»1349* 


GO TYPE ERROR HO. 


05428 


17 


03220 


-0134 


06090 


SK CYL2 




05440 


34 


03546 


00701 


06100 


BNC2 *'-12 




05452 


47 


05440 


00200 


06110 


8 RSTRT 




05464 


49 


00402 


00000 


06120 R3C2 


BTM ERRN»139f» 


GO TYPE ERROR 


05476 


17 


03220 


-0139 


06130 


RDN OCFSCO»»* 


READ DISK HANG-UP « 


POSITIVE STOP 










05486 


36 


03586 


00702 


06140 


BNC2 «-12 




05500 


47 


05488 


00200 


06190 


B RSTRT 




05912 


49 


00402 


00000 


06160* 














06170* 


READ DISK WITH ADDRESS CK 


EXIT 










06180* 














06190 RT03D 


TFM RSTRT4.6»*«» 


LOAD RESTART ADRS 


09924 


16 


00408 


-5524 


06200* 


MUC TRIGGER CNTR 1-2 










06210 


SK CVtOltft 


SEEK CYL 01 


09936 


34 


06984 


00701 


06220* 


CHECK FOR POSITIVE-STOP 










06230 


CM *4.ll,0»10 




05548 


14 


05559 


000-0 


06240 


RDN DCFSCO* 


READ DISK SC « 000 


05560 


36 


03588 


00702 


06290 


BE *460 




05972 


46 


09632 


01200 



m 0023 
PN 2172366 
EC 412531 



OS J 4 



06260 


BTM 


ERRI^9l40«9 






05504 


I? 


03220 


OOJ40 


06270 


SK 


CYLOl 






05596 


34 


06984 


00701 


06280 


eNC2 


*-12 






05608 


47 


05596 


00200 


06290 


B 


RSTRT 






05620 


49 


00402 


00000 


06300# 




MUG TRIGGER 


CNTR 2-4 










06310 


SK 


CYL02»»» 




SEEK CYt 02 


05632 


34 


06998 


00701 


06320* 


CHECK FOR POSITIVE 


STOP 










06330 


CM 


«4^ntO»io 






05644 


14 


05655 


000-0 


06340 


RON 


DCFSCOtt* 




READ DISK SC « 000 


05656 


36 


03S88 


00702 


06350 


BE 


*+60 






05668 


46 


05728 


01200 


06360 


BTM 


ERRN»141*f 




TYPE ERROR N0» 


05660 


17 


03220 


-0141 


06370 


SK 


CYL02,., 




S K 3YL 02 


05692 


34 


06998 


00701 


06380 


BNC2 


*-12 






05704 


47 


05692 


00200 


06390 


& 


RSTRT 






05716 


49 


0C402 


00000 


06400 


SK 


CYL3*f • 




SEEK CYl 03 


05728 


34 


03560 


00701 


06^10 


TFM 


LPCTt20»10ll 






05740 


16 


00449 


OOOK- 


06420 R301 


CM 


*')>ll«Of 10» 




TURN ON E/2 


05752 


14 


05763 


000-0 


06430 


RON 


ADRSCK»t« 




RD DISK FOR ADRS CK 


05764 


36 


03574 


00702 


06440 


BNE 


*4.44*»f 




E/2 ON « I -CYCLE 


05776 


47 


05820 


01200 


06450 


AM 


I.PCT*01,10 






05788 


11 


00449 


000-1 


06460 


BNE 


R3D1 






05800 


47 


05732 


01200 


06470 


B7 


RT03E ' 






05812 


49 


05936 


00000 


06480 


RCTY 








05820 


34 


00000 


00102 


06490 


WATY 


HOLDOOtf* 




ASK IF HEADS AT CYL 


00 






06500 










05832 


39 


06195 


00! 00 


BTM 


YESNOfPSW 






05844 


17 


02996 


-3167 


06510 


BNR 


»+60tPSW 






05856 


45 


05916 


03167 


06520 


BTM 


ERRN»136»»» 




TYPE ERROR NO 


05868 


17 


03220 


-0136 


06530 


RON 


AORSCKtt* 




HANO-UP 


05880 


36 


03574 


00702 


06540 


BNC2 


»-12 






05892 


4? 


05880 


00200 


06S50 


6 


RSTRT 






05904 


49 


00402 


00000 


06560 


BTM 


ERRNel37», 




GO TYPE ERROR 


05916 


17 


03220 


-0137 


06570 


B7 


♦-48 






05928 


49 


05680 


COOOO 


06580# 


















06990* 


READ TRACK SIMILAR 


TO 


ADDRESS CK EXIT 










06600* 


















06610 RT03E 


TFM 


RSTRT+6#*»» 




LOAD RESTART ADRS 


05936 


16 


00408 


-5936 


06620 RSD4 


CM 


*>li»0»10» 




TURN ON E/2 


05948 


14 


05959 


000-0 


06630 


RTH 


DCFTK»t» 




READ TRACK 


05960 


36 


06290 


00706 


06640 


BNE 


R302 






05972 


47 


06004 


01200 


06650 


8C4 


RT034.24 






05984 


46 


04804 


00400. 


06660 


87 


CHKMUC 






05996 


49 


06304 


00000 


06670 R302 


BTM 


ERRN»138*t 




GO TYPE ERROR RD 


TK NRF TROUBLE 




06680 


RTN 








06004 


17 


03220 


-0138. 


DCFTK»»» 




READ TRACK 


06016 


36 


06290 


00706 


06690 




*«-12 






06028 


47 


06016 


00200 


06700 




RSTRT 






06040 


49 


00402 


00000. 


06710* 
















06720* 


DATA* CONSTANTS* i 


AND 


TYPEOUTS 










06730* 


















06740 mhntk ps 


tISOOO 






15000 


00000 





DT 0023 

PN 2172366 
EC 412531 



05.15 



06750 WRAREA 


-DS 










OCR 






06760 RDNTl 


DAC 




f 






QQOIH 




06770 RDNT2 


DAC 


I9f-R0N CMQ«6»SC 


»0J « 




06081 


00038 




06780 ASKCS 


OAC 


38»ARE HEADS AT 


POSITIVE STOPsTYPE 


Y-N • 


06119 


00076 




06790 HDLOOO 


DAC 


31»ARE HEADS AT 


CYL OOtTYPE Y-N • 




06195 


00062 




06800 CSSW 


DS 


1 






06256 


00001 




06810 Z23 


DAC 


16»-RD I-CYC ENTRY* 




06259 


00032 




06820 OCFTK 


DDA 


9U00180»20*RDAREA 




06290 


00006 1 0180 












06296 


00003 -20 












06299 


00005 J5000 


06830« 


















06840* 


















068SO« 


















06860* 


CHECK MUC TRIGGERS 


WILL FLIP 












06870* 




DO A SEEK TO SET MUC 












06880* 




THEN CHECK FOR 


POSITIVE-STOP 












06890* 


















06900* 




MUC TRIGGER 


CNTR 4-8 












06910 CHKMUC 


TFM 


RSTRT+6»*»» 


LOAD RESTART ADRS 


063C4 


16 


00408 


-6304 


06920 


BTM 


TYPE»2Z4 #• 


TYPE Flip muc 


TRGRS 


06316 


17 


03096 


-7097 


069S0 


SK 


CYLOi^f »» 


SEEK CYL 04 




06328 


34 


07012 


00701 


069^0* 


CHECK FOR POSITIVE 


STOP 












06990 


CM 


*+ll»OflO 






06340 


14 


06351 


000-0 


06950 


RDN 


DCFSCOt** 


READ DISK SC « 


000 


06352 


36 


03588 


00702 


06970 


BE 


»460. 






06364 


46 


06424 


01200 


06980 


BTM 


ERRN*14»2tt« 


TYPE ERROR N0» 




06"*76 


17 


03220 


-0142 


06990 


SK 


CYL04»»» 


SEEK CYL . 04 




06388 


34 


07012 


00701 


07000 


BNC2 


*-12 






06400 


47 


06386 


00200 


07010 


B 


RSTRT 






06412 


49 


00402 


00000 


07020* 




MUC TRIGGER 


CNTR 8-10 












07030 


TFM 


RSTRT4.6»* 






06424 


16 


00403 


-6424 


070i»0 


SK 


CYL05»»» 


SEEK CYL 05 




06436 


34 


07026 


00701 


07050* 




CHECK FOR POSITIVE STOP 












07060 


CM 


*+ll»0»10 






06448 


14 


06459 


000-0 


07070 


RDM 


DCFSCO#»» 


READ DISK SC « 


000 


06460 


36 


03568 


00702 


07080 


BE 


♦■♦•60 






06472 


46 


06532 


01200 


07090 


BTM 


ERRN»l43t9» 


TYPE ERROR NO. 




06484 


17 


03220 


00J43 


07100 


SK 


CYL05»»» 


SEEK CYL 05 




06496 


34 


07026 


00701 


07110 


BNC2 


♦«12 






06508 


47 


06496 


00200 


07120 


B 


RSTRT 






06520 


49 


00402 


00000 


07130* 




MUC TRIGGER 


CNTR 16-20 












07UO 


TFM 


RSTRT'*'6»* 






06532 


16 


00408 


-6532 


07150 


SK 


CYtlO»»« 


SEEK CYL 10 




06544 


34 


07040 


00701 


07160* 




CHECK FOR POSITIVE STOP 












07170 


CM 


♦♦llfOtlO 






06556 


14 


06567 


000-d 


07180 


RDN 


DCFSCO»»» 


READ DISK SC « 


000 


06568 


36 


03568 


00702 


07190 


BE 


*4-60 






06580 


46 


06640 


0120Ci 


07200 


BTM 


ERRN*144f9« 


TYPE ERROf; NOe 




06592 


17 


03220 


00J44 


07210 


SK 


CVtlOtff 


SEEK CYL 10 




06604 


34 


07040 


00701 


07220 


1INC2 


*«12 






06616 


47 


06604 


0020d 


07230 


B 


RSTRT 






06628 


49 


0O402 


00000 



DT 0023 
PN 2172366 
EC 412S31 



07240» 




MUC T^I©6E'^ ■ Oitn 31-4© 














07250 


TFM 


RSTRT4-6f* 






06640 


i 6 


00408 




07260 


SK 


CYL20»t» SEEK CVi. 


20 ■. 




.066S2 


34 


07054 


00701- 


07270* 




CHECK FOR POSITIVE - STOP 














07280 


CM 


*+llfOtlO 






06664 


14 


06675 


000-0 


07290 


RON 


DCFSCO.t# READ DISK 


S£ ^ 


000 


06676 


36 


03588 


00702 


07300 


BE 


♦ ♦60 






06688 


46 


06748 


01200 


07310 


BTM 


ERRNfl45#9f TYPE ERROR 






06700 


17 


03220 


00J45 


07320 


SK 


CYL20##» SEEK CYL 


20 




06712 


34 


07054 


00701 


07330 


BNC2 


*-12 






06724 


47 


06712 


00200 


07340 


B 


RSTRT 






06736 


49 


00402 


00000 


07350* 




MUC TRIGGER CNTR 64-80 














07360 


TFM 


RSTRT+6#* 






06748 


16 


00408 


■ ».6748 


07370 


SIC 


CYL40»»t SEEK CYL 


40 




06760 


34 


07068 


00701 


07380» 




CHECK FOR POSITIVE • STOP 














07390 


CM 


♦•MltOtlO 






06772 


14 


06703 


000-0 


07400 


RON 


DCFSCOvrt READ DISK 


sc • 


000 


06784 


36 


03588 


00702 


07410 


BE 


*>60 






06796 


46 


06856 


01200 


07420 


BTM 


ERRNfl46»9» TYPE ERROR 


N0« 




06808 


17 


03220 


00J46 


07430 


SIC 


CYL40»i» SEEK CYL 


40 




06820 


34 


07068 


00701 


07440 


BNC2 


*"12 






06832 


47 


06820 


00200 


07450 


B 


RSTRT 






06844 


49 


00402 


OOOOO 


07460* 




MUC TRIGGER CTR 


128 


- 100 










07470 


TFM 


RSTRT+6** 






06856 


16 


00408 


-6656 


07480 


SK 


CYL50»«« SEEK CYL 


50 




06868 


34 


07082 


00701 


07490* 




CHECK FOR POSITIVE - STOP 














07300 


CM 


*+lltO>10 






06680 


14 


06891 


000-0 


07510 


aoN 


DCFSC0»,, READ DISK 


SC « 


000 


06892 


36 


03588 


00702 


07520 


BE 


*+60 






06904 


46 


06964 


01200 


07530 


BTM 


ERRNfl47 99t TYPE ERROR 


M0« 




Q6916 


17 


03220 


00J47 


07540 


SIC 


CYL5Off0f SEEK CYL 


50 




06928 


34 


07082 


O0701 


07550 


8NC2 


*-12 






06940 


47 


06926 


00200 


07560 


B 


RSTRT 






06952 


49 


00402 


OOOOO 


07570 


0C4 


CHKMUC+24 






06964 


46 


06328 


00400 


07580 


B7 


RT3»5 






06976 


49 


07238 


OOOOO 


07590* 


• - 


DATA 














07600 CYtOl 


DDA 


• lf00200fURDAREA 






06984 


00006 1-1 


0200 












069 0 


00003 -01 












06993 


00005 J5000 


07610 CYL02 


DO A 


• U00400»1»RDAREA 






06998 


00006 1-1 


0400 












07004 


00003 -01 












07007 


00005 J5000 


07620 CYL04 


DDA 


»!• 00800 »I*RDAREA 






07012 


00006 1-1 


08O0 












07018 


00003 -01 












07021 


00005 J5000 


07630 CYl.05 


pDA 


flt01000*lfRDAREA 






07026 


00006 1- 


1000 












07032 


OOOOS -01 












07035 


00005 J5000 


07640 CYtlO 


6da 


•l»02000fl«RDAR£A 






07040 


00006 1-, 


2000 












07046 


00003-01 












07049 


00005 J5000 



or 0023 
PH 2172366 
EC 412531 



05.17 



07650 CYt20 



07660 CYL40 



07670 CYL50 



07680 ZZ* 

07690 ZZ15 

07700 ASKSL 

07710* 

07720* 

07730* 

07740* 

07750* 

07760* 

07770* 

07780* 

07790* 

07800 RT3.5 

07810 

07820 RllA 

07830 

07840 

07850 
07860 
07870 

07880 

07890 
0T900 
07910 
07920 

07930 RllAl 

07940 

07950 

07960 

07970 

07980 

07990 

08000 

08010* 

08020* 

08030* 

08040 RUB 

0S050 

08060 

08070 

08080 



ODA • I • 04000 * I » RD AREA 



DDA f l«08000*lfRDAREA 



DDA fl*10000«l*RDAREA 



DAC I5t-FLIP MUC TGRS« 

DAC 21f-N0RM FILII IND RESET» 

DAC 35flS SELECT LOCK LIGHT ON^TYP 



E Y' 



07054 
07060 
07063 
07068 
07074 
07077 
07082 
07088 
07091 
07097 
07127 
07169 



00003 
00005 
00006 
00003 
C0005 
00006 
00003 
00005 
00030 
00042 
00070 



J5000 

1-8000 

-01 

J5000 

IJOOOO 

-01 

JSOOO 



THIS ROUTINE CHECKS THE FILE 

INDICATOR RESET LINES. 

INSTRUCTION 

RTN (NORMAL OPERATION) 
RON (SECTOR COUNT « 0) 



TFN 


RSTRT4-6»*»» 


LOAD RESTART 


07238 


16 


00408 


-7238 


BTM 


TYPE»ZZ15»» 


TYPE NORMAL FILE I NO 


RESET 














07250 


17 


03096 


-7127 


BTM 


1N0RST»*"H2»» 


RESET INDICATORS 


07262 


17 


02904 


-7274 


RTN 


CYL3»#t 


NORMAL TRACK OP 


07274 


36 


03560 


00706 


BCl 


*-l2 




07286 


46 


07274 


00100 


BNI 


RllAl93600»« 


AORS CHK 


07298 


47 


07390 


03600 


RCTY 






07310 


34 


00000 


00102 


WATY 


ASKSL « t « 


ASK IF SELECT LOCK 


07322 


39 


07169 


00100 


BTM 


YESNO»PSW«» 


GET ANSWER 


07334 


17 


02996 


•3167 


8NR 


»+20»PSW»» • 


RM « YES 


07346 


45 


07366 


03167 


B7 


SELOK 




07358 


49 


10432 


00000 


BTM 


ERRNfl50«» 


TYPE ERROR NO* 


07366 


17 


03220 


-0150 


BNC2 


RllA 




07378 


47 


07262 


00200 


BNI 


«-f36ii3800»f 


OVFLO CHK 


07390 


47 


07426 


03800 


BTM 


ERRN»151*» 


GO TYPE ERROR 


07402 


17 


03220 


-0151 


BNC2 


RllA 




07414 


47 


07262 


00200 


BNI 


»>36>3700»» 


WLR-RBC 


07426 


47 


07462 


03700 


BTM 


rRRN«!52«« 


GO TYPE ERROR 


07438 


17 


03220 


-0152 


BNC2 


«!11A 




07450 


47 


07262 


00200 


BNF 


**24»RSTRT+3 




07462 


44 


07486 


00405 


B 


RSTRT 




07474 


49 


00402 


00000 


BTM 


INDRST»*4.12»» 


RESET INDICATORS 


07486 


17 


02904 


-7498 


RON 


0CFSC0»#t 


RON SCTR CNT • 000 


07498 


36 


03588 


00702 


BCl 


*-12 




07510 


46 


07498 


00100 


BH! 


«436«3600»« 


ADRS CK 


07522 


47 


07558 


03600 


BTM 


ERRN«15S«« 


60 TYPE ERROR 


07534 


IT 


03220 


-0153 



DT 0023 
FN 2172366 
EC 412531 



08090 
08100 
08110 
08110 
08130 
08140 
00150 
08160 
08170 
08180 
08190» 
08200* 
08210* 
08220* 
08230* 
08240* 
08250* 
08260» 
08270* 
08280* 
08290* 
08300* 
08310« 
08320* 
08330* 
08340* 
08350* 
08360* 
00370* 
08380* 
08390* 
06400* 
08410* 
0S420* 
OS430* 
0*#440* 
084S0* 
06460* 
©8470 RT04 
08480 
08490 
0®S0O 
08510 
08^20 
00530 
08540 
08550 
0S560 
OSSTO 
03S80 
@@S90 



BNC2 HUB 

BNI *4.36©3S00^» 

BNC2 Riia 

BNI *'f36f3700M 

BNC2 RUB 

BC4 RllA 

mf *+24»RSTRT43 

8 RSTRT 



©¥FL0 CK. 

QO TYPE ERROt 

WLR-RBC 

CO TYPE ERROR 



©7558 47 
07S10 1? 
07582 47 
07594 47 
07606 17 
07610 47 
07630 46 
07642 44 
07634 49 



HEAD MAP ROUTINE 



THIS ROUTINE GENERATES A HEAD MAP* 

THIS MAP IS 10 DIGITS LONG AND IS 

A SERIES OF DIGITS 0-9»AT SIGNStANO RM, 

•FIRST A SEEK IS PERFORMED TO MOVE THE 

ACCESS MECHANISM TO SOME CYLINDER (03» 
-SECOND A READ TRACK IS USED TO TRANSFER 

DATA FROM HD 0-9 TO THE 1620# 
•THIRD GENERATE MAP - HD NO«OROER 0123456789 
AT SIGN « NO DATA TRANSFER 

RECORD MARK « PARITY OR RD CK ON TRANSFER 
DIG 0 - 9 « SCTR AORS DECODED TO HD NO 



-FOURTH 



NORMAL MAP 



0123456769 



-ERROR TYPEOUT 



HEAD MAP XXXXXXXXXX 
WHERE - 

X--X IS MAP CHARACTERS 



R4BB 



HMER 



R485 



TFM 

BTM 

TFM 

$K 

TFM 

TDM 

DC 

TFM 

TFM 

TFM 

TFM 

BTM 

BTM 



RSTRT-#-6**»t 

TYPE.225 ft 

CYL3+5f780»» 

CYL3f t» 

CYL3+59780,» 

HMER»0 

1»0,*«»2 

AERC»0«9 

XERCt0f9»» 

PERC»0»9»t 

R4B3*6»19999»» 

SR£SEtt»» 

INORST 



LOAD RESTART AORS 
TYPE READ HEAD MAP 

SEEK TO CYLINDER 03 



INIT 

lAL 

I2E 

RESET READ AREA 



07666 
07678 
07690 
07702 
07714 
07726 
07735 
07738 
07750 
07762 
07774 
07786 
07798 



07486 
07594 
03220 
074a6 
07630 
03220 
07486 
07262 
07666 
00402 



16 00408 

17 03096 
16 03565 
34 03560 
16 03565 

15 07735 
00001 

16 10062 
16 10067 
16 10070 

16 06304 

17 01140 
17 02904 



OS80O- 
-0154 
00200 
03700 
-0155 
00200 
00400 
00405 
00000 



-7666 
J0097 

-0780 
00701 
-0780 
00000 

00-00 
00-00 
00-00 
J9999 
•0000 
-0000 



DT 0023 
PN 2172366 
EC 412531 



05.19 



08600 


RTN 


CYL3»»8 


READ TilACIC H© f TO 0 


01810 


36 


03560 


00706 


08610 


BI 


R4B1M8«600 




01822 


46 


08110 


00600 


06620 


NOP 






07634 


41 


00000 


ooood 


08630* 


CHECK 


FOR RECORD MARKS IN 


SECTOR ADDRESS 










08640 


BNR 


♦+20,RDAREA 




07846 


45 


07866 


15000 


08650 


B7 


R4B1+48 




07858 


49 


08110 


00000 


08660 


BNR 


*+20»RDAREA+l 




07866 


45 


07886 


15001 


08670 


B7 


R4B14'46 




07878 


49 


08110 


00000 


08680 


BNR 


*+20,RDAREAf2»f 


CHECK FOR 8»2 BITS 


07866 


45 


07906 


15002 


08690 


87 


R4B1+48 




07898 


49 


OSllO 


00000 


08700 


BNR 


*+20,RDAREA-»-3 




07906 


45 


07926 


15003 


08710 


B7 


R4Bl4-4e 




07918 


49 


08110 


00000 


08720 


BNR 


*+20,RDAREA+4 




07926 


45 


07946 


15004 


08730 


B7 


R4BI+48 




07938 


49 


08110 


00000 


08740* 


CHECK FOR DATA TRANSFER 










08750 


BD 


R4BI*RDAR£A9* 


CHK FIRST CHAR 


07946 


43 


08062 


15000 


08760 


BD 


R4BltRDAREA+l». 


CHK SECOND CHAR 


07958 


43 


08062 


15001 


08770 


BD 


R4BURDAREA'i>2** 


CHK THIRD CHARtEVEN 


Q7970 


43 


08062 


15002 


06780 


BD 


R4Bl»RDAREA43o 


CHK FOURTH CHARtOOD 


07982 


43 


08062 


15003 


08790 


BD 


R4Bl.RDAREA-»5»» 


CHK SIXTH CHAR»ODD 


07994 


43 


08062 


15005 


08800 


BD 


R4Bl»RDAREA+6»» 


CHK SEVENTH CHARtEVEN 
















08006 


43 


08062 


15006 


08810* 


SET WAP CHAR TO AN AT 


SIGN 










08820 


AM 


XERCfOl.lO. 


UPDATE XFER ER CNTR 


08018 


11 


10067 


000-1 


06830 


TD 


HMER»RM 




08030 


25 


07735 


03545 


08840 


TDM 


BOX««« 


BLANK « NO XFER 


08042 


15 


00605 


00000 


08850 


DNB 


1»* 




08053 


00001 




08860 


B7 


R4B2 




08054 


49 


08146 


00000 


08870* 


CHECK FOR PARITYtFlRST 


5 CHAR 










08880 (^481 


SF 


RDAREA 




08062 


32 


15000 


00000 


08890 


TF 


RDAREA4.4 • RDAReA>f4» • 


RD-WR MEM DATA 


08074 


26 


13004 


15004 


08900 


BI 


*+24p1600 




08086 


46 


08110 


01600 


08910 


BN! 


R484»1700 




08098 


47 


08166 


01700 


08920* 


SET MAP CHAR TO A RECORD MARK 










08930 


AM 


PERC*OiaO» 


UPDATE PARITY ER CT 


08110 


11 


10070 


000-1 


08940 


TD 


BOXfRMt* 


RM « PARITY ER 


08122 


25 


00805 


03545 


08950 


TO 


HMER»RM 




08134 


25 


07735 


03545 


08960 R462 


TF 


BADSA,CYL34-5f » 


STORE BAD HD ADRS 


08146 


26 


10051 


03565 


08970 


B7 


*+32 




08158 


49 


08190 


00000 


08980* 


COMPUTE HEAD NO«FROM SECTOR ADRS 










08990 R4B4 


MM 


RDAREA-f4t05«|0« 


COMPUTE 


06166 


13 


15004 


000-5 


09000 


TD 


80X*97*» 


TRACK N0« 


08178 


25 


00805 


00097 


09010 


^F 


95#»» 




08190 


32 


00095 


00000 


09020 


CM 


96>3fl0»» 




08202 


14 


00096 


000-3 


09030 


BE 


*4-48 




08214 


46 


08262 


01200 


09040 


SF 


BOX 




08226 


32 


00805 


00000 


09050 


AM 


AERC»1»10 




08233 


11 


10062 


000-1 


09060 


TD 


HMERfRM 




08250 


25 


07735 


03545 


09070 


B 


R4B3 




08262 


49 


06298 


00000 


09080 


BD 


*-48f99»»© 




00274 


43 


06226 


00099 


09090 


BD 


*»60«96*«» 




08236 


43 


06226 


06098 



DT 0023 
PN 2172356 
EC 412531 



1. 



no ^ tif\ DA an 


TO 


19999 f BOX »f 










00805 


Uy 1 10 


SM 


♦-6»0i»* DECR FOR 




03310 


12 


08304 


«»0001 


V7 IcXJ 


SM 


CYL3+5»20f 10, NEXT HD 




A ft "S ^ 


12 


03563 


OOOKO 




, CM 


CYL3+5»5eO,9, CHK ALL HEADS 


OCT A A 




14 




00N8O 




BNE 


R4B5 




06346 


47 


07786 


01200 


noi KA 


- TFM 


CHKSL+5«780»« 




063!?6 


16 


A 4 C JL 

03565 


-0780 


A O 4 £ A A 
















AO t *T AJfc 


DECODE ERROR MAP AND ERROR COUNTERS 












n o in A « 

U T i. 0 v> " 
















A a 1 O A A 


CHECK FOR XFER FAILURE ON ALL HEADS* 












AO OA A 


SK 


CHKSL«»» 




00370 


34 


03560 


00701 


A Q 9 1 A 


81 


SELOK*3600,, 




08382 


46 


10432 


03600 


A Q '5 •» A 


BNR 


R4D0«HMER 




08394 




09010 


07735 


r% •> ^ #^ 

09230 


BTM 


ASK3*»-l-12»t GO ASK IF AT 


CYL 3 


08406 


17 


09886 


-8418 


A #. f% 

092*»0 


CM 


XERC»10»10» CHK ER CNT « 


10 


084X8 


14 


10067 


OOOJO 


A O 4 K A 

09Z50 


8E 


R4X1 




08430 


46 


09498 


01200 


09260* 


CHECK FOR PARITY CHK WITH ALL HEADS* 












Afil T A 


CM 


PERC»10»10» CHK ER CNT « 


10 


08442 


14 


10070 


OOOJO 


AO^A A 
U9£OU 


BE 


R4X2 




08454 


46 


09650 


01200 


A O A A M 

09290* 


CHECK FOR ANY ERRORS 












A '9 A A 


A 


PERC»XERCe» COMPUTE TOTAL 


ERRORS 


08466 


21 


10070 


10067 


AO'S 1 A 


BE 


R4X3»*« 




08478 


46 


09414 


01200 


W J' J <c w ^ 




TOTAL CNT • 1 












V T 5 5 w 


'cm 


PERC«01«10 




G f\ 

08490 


14 


10070 


000-1 




BE 


R4D2 




rt Q c A 9 


46 


08 1 i3 


01200 


\Ji> 3 V " 




TOTAL CNT « 10 










AQ^£ A 


CM 


PERC»10*10 




085 14 


14 


10070 


OOOJO 




BNE 


R4D1 




Oo?£D 


4 / 


Ooo J4 


01200 


V 7 J o w ^ 


10 


XFER AND PARITY ERRORS 












w 3^ 7 \f ^ 


CHECK FOR 1 XFER FAILURE 














CM 


XERC»01tl0 




08538 




1 A A A *y 


A A A» 1 




BE 


R4X2 




08550 


4o 


( 1 A A K n 


A 1 "3 A A 

01200 


M ^ «»p *c ^ 


BTM 


HMTOE»160 9ft TYPE ERROR NO 




08562 


i ( 


A 0 A 


A 1 A 


V 7 •?> ^ w 


Bl 


*4-36*00100»» 




Q8574 


4p 


ij jC. 1 A 

086 iO 


00 loo 


AQA AA 


BI 


$CAN1»00200»» 




08586 




A A ■? 7 

00 / / 0 


A A A A 

0020 0 


V y »^ V 


B 


R4BB»»» 




08598 




A7 7 1 A 


A A A A A 


W * V? V 


36 


CYL3»0070&»» 




08610 


Jo 


n a Si A A 


A A "f A A 

00 /Oo 




B 


*-4S9«# 




08622 


A 0 

49 


A a K T A 

US3 74 


A A A A A 

OOUQO 


U ^ 0 U " 


^ SOME XFERtPARSTYfAND SOME GOOD DATA 














C 


XERC»PERC»f CHECK FOR NO 


XFER ERRORS 
















08634 


24 


10067 


10070 


v> » V V 


' BE 


R4D11 




08646 


4© 


A fl ■? A •!> 


A 1 "I A A 


09510 


BD 


»4.20-iXERC 




08658 


43 


08678 


10067 


09520 


B7 


R4X2 




03670 


49 


09650 


00000 


09530 


BTM 


Hf^T0Ejl61»» TYPE ERROR 




08678 


17 


09746 


-0161 


09540 


B 


R4B7»», 




08690 


49 


09102 


00000 


09550 RADU 


NOP 






08702 


41 


00000 


00000 


09560 


' BTM 


HMT0E*162*» TYPE ERROR HO 


• 


08714 


17 


09746 


-0162 


095T0 


; B 


R4B7»»» 




08726 


49 


09102 


00000 


09580» 




I ERROR EITHER PARITY OR XFER 












09590 moi 


CM 


XERC»0l«ia 




08738 


14 


10067 


000«l 



m 0023 
PH 2172366 
EC 412531 



05.21 



09600 


BE 


R4X3 


08750 


46 


09 h'jQ 


01200 


09610 


DIM 


HMT0Etl63»t TYPE ERROR N0# 


06762 


I? 


09T46 


-0163 


09620 


R7N 


BRDX4»f» READ BAD DATA 


08774 


36 


10046 


00706 


09630** 


FIND LOCATION OF BAD PARITY 










09640 


BTM 


INDRST»»» RESET INDICATORS 


08786 


17 


02904 


-0000 


09650 


TFM 


♦+35»RDAREA 


Q6798 


16 


08633 


J5000 


09660 


TF 


♦+16»»+23 


08810 


26 


08828 


08833 


09670 MOV 


TD 


99999f99999». MOVE D13IT 


08822 


25 


99999 


99999 


09660 


AM 


♦-1»01 


06634 


11 


08833 


-0001 


09690 


BI 


MOVPAR»1600., CHECK FOR 


08846 


46 


08954 


01600 


09700 


BI 


MOVPAR»1700t» PARITY 


08858 


46 




01700 


09710 


CM 


MOV411»RDAREA+2l0Of fCHK DONE 


00870 


14 


08833 


J7100 


09720 


BNE 


MOV-12 


08882 


47 


08810 


01200 


09730 L8R0 


NOP 




08894 


41 


00000 


00000 


09740 


RTN 


eRDX4»f» READ WITH BAD HEAD 


08906 


36 


10046 


00706 


09750 


6C1 


♦-12 


08918 


46 


08906 


00100 


09760 


BNC2 


R4B7 


08930 


47 


09102 


00200 


09770 


B 


RSTRT 


08942 


49 


00402 


00000 


097B0* 














09790 WOVPAR 


SM 


MOV+ll,RDAREA.t COMPUTE DELTA 


03954 


12 


08833 


J50Q0 


n o a A A 
09800 


TF 


♦+10»MOV*H1 


08966 


26 


08984 


08633 


AOS ^ A 

0**o 10 


SPTY 




08978 


34 


00000 


OOlQl 


09820 


DC 


01t»»*-4 


08985 


00001 




09830 


WNTY 


*-lO»»» TYPE PARITY LOCATION 


08990 


38 


08980 


00100 


09840 


B7 


LBRD 


U9002 


49 


08894 


00000 


09850* 


CHECK HEAD MAP VS NORMAL MAP 










AOtt^A &4.flkA 

09860 K^^DO 


TDM 


19989,0, U» SET FLAG 


09010 


15 


19989 


0000-* 


09870 


C 


19999 »NHOM»» CHK NORMAL MAP 


09022 


24 


19999 


10431 


09880 


BNE 


**44 


09034 


47 


09078 


01200 


09890 


BC4 


R4BB 


09046 


46 


07714 


00400 


09*900 


BC3 


RT02 


09058 


46 


04186 


00300 


09910 


B7 


L0AD2 


09070 


49 


00414 


OOUOO 


09920* 














09930* 


OUTPUT - ERROR NUMBER AND HEAD MAP 










09940* 














09950 


BTM 


ASK3**-H2»» 60 ASK IF AT CYL 3 


09078 


17 


09886 


-9090 


09960 


BTM 


HMT0Efl64»t TYPE ERROR NO. 


09090 


17 


09746 


-0164 


09970 Ri^B7 


RCTY 




09102 


34 


00000 


0010.2 


09980 


TD 


19999tRM 


09114 


25 


19999 


03545 


09990 


WATY 


ROHN 


09126 


39 


10211 


00100 


10000 


RCTY 




09138 


34 


00000 


00102 


10010 


WATY 


RQAL 


09150 


39 


10303 


00100 


10020 


SPTY 




09162 


34 


00000 


00101 


10030 


RNTY 


MONM 


09174 


36 


10064 


00100 


10040 


8NR 


R4X7*HDNM 


09186 


45 


09294 


10064 


10050 R4X6 


TFM 


CYL34-5»780 


09198 


16 


03565 


-0780 


10060 


RTN 


CYL3,»« 


09210 


36 


03560 


00706 


10070 


SM 


CYL3+5,20,10 


09222 


12 


03565 


OOOKO 


10080 


CM 


CYL3'»-5t580»9 


09234 


14 


03565 


OONaO 


10090 


BNE 




09246 


47 


09210 


01200 


10100 


BCl 


R4X6 


09258 


46 


09198 


OOIQO 



DT 0023 
FN 2172366 
EC 412531 



1 ft 1 1 fl 


Driv £ 


K«*D f 






4. '• '■S 


Qy i 02. 


1 0 1 2 0- 

t V ^ a. w 


w 






£1 O 5 S8 3 


ACS 


U r 6o& 




MM 


WfSiyM «.0 3» « 1 0 






1 i 


■J A A i. A 


I U A •* u 


T f? 

! r 






©9306 


2^ 


03364 


I u i PU 


CI V u 


CtL3 




09316 


36 


03560 


L U 1 ou 


Ov. 1 






09330 


46 


09 jIS 


1 rt i 7 ft 

t W i f u 


TP 






09342 


25 


15040 


I w A V w 


fllf*TV 
rtw 1 T 






A Q K y. 


34 


t\ f\ f\ f\ t\ 


1 01 00 


UMTV 
W r) 1 T 






09366 


38 


15000 


I 0?fiO 
L w c. V' y 








d *3» O 


46 


09294 


10210 


BHC2 


R407 




CiQ%QCi 
vy J 7 w 






10220 


8 


RT04 




09402 


49 


07666 


10230# 














10240 


WOP 






09414 


4i 


00000 


L0250 


BTM 


HMT0E»168 




09426 


17 


09746 


L0260 


B 


R4B7 




09438 


49 


09102 


10270 R4X3 


NOP 






09450 


41 


00000 


10280 


BTM 


HMT0E»165#» 


GO TYPE ERROR 


09462 


17 


09746 


10290 


BNC2 


R407 




09474 


47 


09102 


10300 


B 


RSTRT 




09486 


49 


00402 



0310» 
0320* 
0330» 
0340* 
0350* 



SECONDARY TEST FOR NO DATA TRANSFER 
FROM ANY OF THE 10 HEADS 

ASK USER IF HEADS ARE LOADED 



ouooo 

000-2 
00099 
00706 
00100 
03545 
00102 
00100 
00400 
00200 
00000 

00000 
-0168 
00000 
00000^ 
»0165 
00200 
00000 



10360 R4X1 


NOP 






09498 


41 


00000 


.0370 


RCTY 






09510 


34 


00000 


10380 


Waty 


HOLD»»« 


ASK IF HD LD 


09522 


39 


10123 


10390 


BTM 


YESN0«PSW9f 


GET ANSWER 


09534 


17 


02996 


10400 


mn 


R4Xll9PSW#» 


RM » YES 


09546 


43 


096^6 


10410 


BTM 


R£FNt55»lO» 


GO TYPE REF N 


09558 


17 


03164 


10420 


WATY 


TYPHD 




09570 


39 


10399 


10430 


DNTY 


199909,59 


DUMP HEAD MAP 


09582 


35 


19990 


10440 


TFM 


19999,0,. 


RESET DUMP AREA 


09594 


16 


19999 


10450 


M 






09606 


48 


00000 


10460 


B7 


BITRNG 




09618 


49 


02134 


[0470 R4X11 


BTM 


ERRNf 1$6»* 


GO TYPE ERROR 


09626 


17 


03220 


,04@0 


8 


RSTRT 




09638 


49 


00402 


10490* 














L0500* 


SECONDARY TEST 


FOR PARITY CHECKS 








10510* 


OR 


READ CHECKS 


ON AUL HEADS 








10520* 












R4X2 


HOP 






09650 


41 


00000 


L0340 


BTM 


REFN»57flO« 


GO TYPE REF P 


09662 


17 


03164 


LO550 


WATY 


TYPHD 




09674 


39 


10399 


10560 


DNTY 


19990»f • 


DUMP HEAD MAP 


09686 


35 


19990 


10570 


TFM 


19999»0«» 


RESET DUMP AREA 


09698 


16 


19999 


I05SO 


H 






09710 


48 


00000 


l05fO 


BTM 


RSTIND 




09722 


17 


02904 


lOiO© 


87 


SCANl 




09734 


49 


00776 



0610* 



00000 

00102 
00100 
-316 7 
03167 
000N5 
00100 
00100 
-0000 
00000 
00000 
-0166 
00000 



00000 
000N7 
00100 
00100 

-0000 

ouooo 

-0000 
00000 



or 0023 
PN 2172366 
EC 412S31 



05.23 



10620* 


Em 


















10650* 




















106^0 


DS 


5 








09745 


00005 




10650 HMTOe 


BCl 


HMTOEl 








09746 


46 


09078 


00100 


10660 


RCTY 










09750 


34 


00000 


00102 


10670 


WNTY 


RSTRT4'2*»t 




TYPE RT LOC 




09770 


38 


00404 


00100 


10680 


TD 


ERR*14»HMT0E-3 








09782 


25 


03417 


09743 


10690 


TO 


ERR+16»HMT0E-2 








09794 


25 


03419 


09744 


10700 


TO 


ERR^-lSeHMTOE-i 








0980^ 


2 5 


03421 


09745 


10710 


WATY 


ERR«*f 




TYPE ERROR WO. 




09818 


39 


03403 


00100 


10720 


WATY 


TYPHD 








09830 


39 


10399 


00100 


10730 


DNTY 


19990»»* 




DUMP HEAD MAP 




09842 


35 


19990 


00100 


10740 


TFM 


19999»0it 




RESET DUMP AREA 




09854 


16 


19999 


-0000 


10750 


H 










09866 


48 


00000 


OOOOO 


10760 HMTOEl 


BB2 










09870 


42 


00000 


00000 


10770* 




















10780* 


ASK USER IF ACCESS 


IS 


POSITIONED AT CYL 


03 










10790* 




















10800 


DS 


5 








09884 


00005 




10810 ASK3 


RCTY 










09886 


34 


00000 


00102 


10020 


WATY 


TSWC31»»* 




CHK HPS AT CYL 3 




09898 


39 


03441 


00100 


10830 


8TM 


YESNO»PSW«» 




GET ANSWER 




09910 


11 


02996 


-3167 


10840 


BNR 


*+32»PSW#» 




RM « YES 




09922 


45 


09954 


03167 


10050 
10860 


TF 

87 


«*18»ASK3-1 

99999* » 9 








09934 
09946 


26 

49 


09952 
99999 


09885 
OOOOO 


10870* 




















losao 


8TN 


ERRN»167»« 




TYPE ERROR 




09954 


17 


03220 


-0167 


10890 


TFM 


ASK3«1»R4B8 








09966 


16 


09685 


-7714 


10900 


SK 


CYt3»»» 




SEEK CYL 03 




09978 


34 


03560 


00701 


10910 


8C1 


»"12 








09990 


46 


09976 


00100 


10920 


SHC2 


ASK3 








10002 


47 


09886 


00200 


10930 


8TN 


REFN»52f 10* 




GO TYPE REF K 




10014 


17 


03164 


000N2 


10940 


H 










10026 


48 


00000 


OOOOO 


10950 


B7 


R4BB 








10038 


49 


07714 


OOOOO 


10960* 




















10970* 


DATA AND CONSTANTS 


FOR 


ROUTINE 4 












10980* 




















10990 BR0X4 


DDA 


«lf99V99»20»RDAREA 






10046 


00006 1R9999 














10052 


00003 -20 














10055 


00005 J5000 


11000 BAOSA 


DS 


♦ BRDK44.5 








10051 


00000 




11010 AERC , 


DC 


03 »0 








10062 


00003 




11020 HDNM 


DC 


2*30 








10064 


00002 




11030 XE'ftC 


DC 


03f0 








10067 


00003 




11040 PERC 


DC 


03tO 








10070 


00003 




11050 TORD 


DAC 


12f DATA READ • 








10073 


00024 




11060 Zt3 


DAC 


ISf-RD HEAD MAP* 








10097 


00026 




11070 HOLD 


OAC 


44 » ARE HEADS LOADED 


TO DISK SURFACE* 


TYPE 


Y-N » 




















10123 


00088 




iioio nom 


DAC 


46« TO READ CtOOP) 


SINGLE HEAD ENTER 


HEAD 


NUMBER* 


















10211 


00092 





DT 0023 
PN 2172356 
EC 412531 



J6 : 



11090 RQAL ^-PAC TO «im9 1100^1, ALL HEk.:^^ k.. ■ ,h a HtLQiW f * 

10B03 Q0092 

11 100 HOCHT DC 03 tO 10396 00003 

illlO TYWO DAC 12*-HEA0 HAP • 10399 00024 

11120 NHOW DC t0»0l23456789 10<^3l OOOiO 

inso* 

11140* 1311 DISK - SELECT LOCK 
11150» 

11160* THIS PROGRAM DETERMINES THE 

iinO* CAUSE OF SELECT LOCK ON THE 

I1180» IBM 1311 DISK PILES 
11190* 

11200* THE POSSIBLE CAUSES ARE AS FOLLOWS - 

lltlO* 1 - HEAD SELECT SAFETY 

11220* 2 - yRITE/ERASE SAFETY 

U230* 3 - READ/WRITE GATES 

11240* 4 - AC /DC SAFETY 

11250* 5 - MODULE SELECT SAFETY 

11260* 

11270* CONTROL ROUTINE 

11280* 

11290 SELOK TFM RSTRT4-6«*«» LOAD RESTART 10432 16 00408 J043a 

11300 -STN REFNe599l0» GO TYPE REF R 10444 17 03164 000N9 

ilSlO H 10456 48 00000 00000 
11320* 

11530* THIS SUBPROGRAM CHECKS AC-DC 9fe/R-ERf 

11340* AND RD-WR SAFETY SELECT LOCK 

11350* ■ 

113^0 TFM RSTRT-l-69* 10468 16 0040S J0468 

11370 BTM INDRST?** RESET INDICATORS 10480 17 02904 -0000 

11380 RDM RESETS* 9 10492 36 03602 00702 

11390* CHECK FOR SELECT LOCK 

11^00 SK CHKSLt^* SEEK MSTR MOD 1050^4 34 03560 00701' 

11410 BNS SL81*3600»» AORS CHK « SEL LOK 10516 47 10796 03600 

11420* ERROR CONDITION DETECT- 

11430* ■ AC-DCfWR-ER^RO'-WR 

11440 BTM REFN«62flO» GO TYPE REF S 10528 17 03164 00002 

11450 H 10&40 48 00000 00000 

11460 RDN RESET»»» 10552 36 03602 00702 

11470* ; CHECK FOR SELECT LOCK 

tl4aO SK CHKSL 10564 34 03560 00701 

ll^^O 81 *4.32*3600«« ADRS CK « SEL LOK 10576 46 10608 03600 

11900 BTM ERRH»170»» WR-ER CAUSED SEL LOK 10S88 17 03220 -0170 

11510 .87 SLE1*«»# 10600 49 10760 OOOOO 

11520* STILL GOT SELECT LOCK WITH WR-ER 

11530* , , SAFETY PULLED#S0HETHIN6 ELSE CAUSED IT 

nS40 BTM REFN»i3*iO» 60 TYPE REF T 10608 17 03164 0OOO3 

11550 H 10620 48 00000 OOOOO 

11560 -RDN RESETst* 10632 36 03602 00702 

11S70 SK CHKSLf»* CHK FOR SEL LOK 10644 34 03560 00701 
BI »*32»3600t» ADRS CHK « SEL LOK 10656 46 10688 03600 



m 0023 
PN 2172366 
EC 412531 



05.25 



1 1590 






■ ■ ■ ■ ' J.'. 








-0X71 


11600 


ST 


tA i;7 J ... .-, 










00000 


11510« 


■ ^D-Wf^ DIDMT CAUSi 


I SELECT LOCK 










11620 


BTM 


REFN»64$109 


60 TYPE f?EF ■ y 


10680 


1 7 


03164 


00004 


11630 


H 






10700 


48 


00000 


00000 


11640 


RON 


RESET»t» 




10712 


36 


03602 


00702 


11630 


stc 


CHKSLf 9» 


CHK FOR S£L LOK 


1072^t 


34 


03560 


00701 


11660 


Bl 


»+36»3600»» 


APRS CK « S£L LOK 


10736 


46 


10772 


03600 


11670 


BTM 


ERRN*172*9 


AC-DC CAUSED SEL LOK 


10748 


17 


03220 


-0172 


11680 SLEl 


NOP 






10760 


41 


00000 


00000 


11690 


NOP 






10772 


41 


00000 


00000 


11700 


B 


SEL0K»4^36»»t 


TRY AGAIN 


10784 


49 


00036 


00000 


11710* 
















n720» 
















11730* 


MODULE SELECTION 


SELECT LOCK 










11740* 
















11750* 
















11760* 


TH 


IS ROUTINE CHECKS - MULTIPLE MODULE SAFETY 










11770* 
















11780 SLBl 


TFM 


RSTRT+6»* 




10796 


16 


00408 


J0796 


11790 


SK 


RESETf *» 


RESET SEL LOK 


10808 


34 


03602 


00701 


11800 


BTM 


RSTIND?»» 


RESET INDICATORS 


10820 


17 


02904 


-0000 


11810 


TD 


SEEK*460 




10832 


23 


12050 


00^*60 


11»20 


,SK 


SEEK 




10844 


34 


12050 


00701 


11830 


SK 


CHKSL 




10856 


34 


03560 


00701 


11840 


SNI 


SLHD»3600 




10 868 


7 




03600 


118S0 StB2 


TFM 


RSTRT+6»» 




10880 


16 


00408 


J0880 


11860 


SK 


RESET 




10892 


34 


03602 


00701 


11870 


BTM 


RSTINO 




10904 


17 


02904 


-0000 


11680 


PCTY 






10916 


34 


00000 


00102 


11890 


WATY 


TNMOD«»« 


REQUEST NO* OF MOD* 


10928 


39 


12065 


00100 


11900 


RNTY 


NOMOD9 


ACCEPT NO. 


10940 


36 


03247 


00100 


1 1910 


CM 


NOMOD»l*iO 




10952 


14 


03247 


OOC-I 


11920 


BE 


SLB3 




10964 


46 


11012 


01200 


11930 


-RCTY 






10976 


34 


00000 


00102 


11940 


WATY 


TOAM 




10988 


39 


11477 


00100 


11950 


H 






11000 


48 


00000 


00000 


11960 $LB3 


TFM 


MMAP90»» 


RESET MOD MAP 


11012 


16 


11520 


-0000 


11970 


TFM 


MOD*OtlO« 


RESET MOD CNTR 


11024 


16 


11523 


000-0 


11980 


TFM 


P2+69MMAP-3 




11036 


16 


11126 


J1517 


U990 BZl 


MM 


MOD«02» 10« 


COMPUTE 


11048 


13 


JL X ^ ^ 3 


000»2 


12000 


AM 


99#0U10|, 


DRIVE 


11060 


11 


00099 


000-1 


12010 


TO 


SEEKt99»« 


CODE 


11072 


25 


12050 


00099 


12020* 


SELECT MODULE 












12030 


SK 


SEEK 9, 9 9 


SEEK MODULE 


11084 


34 


12050 


00701 


12040* 


CHI 


ICK FOR SELECT 


LOCK 










12050 


SK 


CHKSL* »t 


CHECK 


11096 


34 


03560 


00701 


12060 


BNI 


*4^43i3600«t 


SELECT LOCK 


11108 


47 


11156 


03600 


12070 P2 


TDM 


99999f lt» 


SET MAP TO 1 


11120 


15 


99999 


0000 i 


12080 


SK 


RESET « t « 


RESET 


11132 


34 


03602 


00701 


12090 


BTM 


R$T!M0»t« 


IND 


11144 


17 


02904 


-0000 



or 0023 
FN 2i?2366 
EC 412531 



OS. 36 



I c I UU 


AM 


P2+6»01*10f 




I 1 1 3 O 


1 1 


1 1 l^O 


UOu-'I 


1 1 1 0 


AM 


MODf01«10» 




■■v* ^ 


X 1 


i 1523 




A £ 1 £ W 


C 


MODfNOMOD»f 


V.niK ALL. MuLI* d&LcwT&y 


i i ivU 


9 ^< 




P i & *f « 


L c I J U 


BNE 


821 




111 £ 






Ui^OO 


191 A Am 


DECODE MODULE MAPtl 


•* ScL LOK 










I £1^0 


CM 


MMAP»0.« 


0000 MOD set OKAY 


H204 


14 


11520 


"*0000 




BE 


SW22 




11216 


46 


11420 


01200 


12170* 


SCAN FOR A ZERO 












1 9 1 ft n 


TFM 


MOD»0«10« 


INITIALUE 


11228 


16 


11523 


OOO""© 


121 


TFM 


024-11 «MMAP-3 




11240 


16 


11263 


J1517 




80 


«-»-20,99999»» 


IS MAP DIG « 1 




43 


11272 


f\ t\ f\ trs 

99999 




B7 




FOUND A ZERO 




^9 




<"» A A r\ A 

y y uuu 


1 9 9 •» 


AM 


M0D»01*10» 


UPDATE 


11272 


11 


11523 


000-1 


1 99 A 


AM 






11284 


1 1 


11263 


000-1 


t 9 "> A 


C 


MQD»NOMODt« 


SCAN COMPLETED 


11296 


24 


11 


0324? 


? 9 ^ e A 


BNE 


Q2 




11308 


47 


11252 


01200 


1 9 9 Aft® 


LOOKS LIKE 2 OR MORE 


MODULES ALWAYS SELECTED 










1 9 9 


BTM 


ERRN»173»711««» 




11320 


17 


03220 


-017L 


1 99«0 


B7 


B23 




1 1 n o 




il3o«l- 


A A /I A A 


i. &. C ' V 


SELECTED MODULE FOUND 












TD 


M0DULE*14»M0D 




1 1 "2 ii. n 


'J 8i 




1 1 & o "a 




8.TM 


ET0»SELM»711» 


GO TYPE ERROR 


i i J 3 <c 


17 


12232 


J 1 V L 




BCi 


»+36 




■8 « "S £. A 


46 


11400 


A A 1 A A 

U u 1 0 0 


12330 


WNTV 


MMAP-3*9» 


TYPR MAP 


i. i> ^ f O 


38 


11517 




A ft. ™r w 


H 






1 t 'A ft fl 


48 


00000 


A A Art A 


A & 13 W 


BNC2 


SLB3 




11400 


47 


11012 


00200 


A «tr «? 9t? V 


87 


SELOK 




t 1 A 1 !? 
J. 


49 


10432 


A Art A A 


12370 


8C4 


SELOK 




1 1 A.9fl 


46 


10432 


AA/i A A 


il & ^ V V 


BTM 


REFN»69#10« 


TYPE REF N0» I 




17 


03164 


00009 


12390 


H 








48 


00000 


vMUU u 


12400 


BC4 


SELOK 






46 


10432 


V V*PV w 




B7 


L0AD2 






49 


00414 








CONSTANTS 












12^ SO TOAM 


DAC 


20»TURN ON ALL MODULES* 




00040 






DC 


05»0 




t 1 K9 A 


00005 




12490 


DC 


01»» 






00001 




12460 


DC 


02*0 




1 1 <i3'5i 


00002 




1 94tQ« 
















12480* 
















I2%90» 


MEAD SELECT SAFETYtSELECT LOCK 










12500* 
















12510* 
















12510* 


THIS ROUTINE CHECKS 


HEAD SELECTION SAFETY 










12!^30* 
















12540 SLHO 


TFM 


RSTRT-i-69* 




11&24 


16 


00408 


J1524 


12550 


TP 


5EEK»460«»f 




11536 


25 


12050 


00460 


12S60 


TpM 


B31+11»L00P 
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DC 


OltO 





13016 16 
13026 17 
13040 48 
13052 34 
13064 16 
13076 26 
13068 13 
13100 25 
13112 34 
13124 39 



00408 
03164 
00000 
13252 

13087 
13237 
13257 
13279 

00000 
13267 



J30i6 
00008 
OUUOO 
00701 
J328? 
99999 
000-5 
00097 
00102 
OOiOO 



13136 36 13252 00706 



14420 HASAO DSA 07000t07060t07060t07140»07I60»07020f 07040 



14^30 

14440* 

144S0* 

14460* 

14470* 

.144§0» 



TCD START 



13148 
13160 
13172 
13184 
13196 
0 

13208 
13220 
13232 
13244 
13252 
13258 
13261 
13267 
13282 
•07100 
13287 
13292 
13297 
13302 
13307 
13312 
13317 
13322 
13327 
13332 
03616 



47 13136 00200 

46 13160 00200 
11 13087 -0005 
14 13087 J3337 

47 13076 01200 

46 13064 00400 

48 00000 00000 
46 00402 00400 

49 03616 00000 

00006 1-7000 
00003 -20 
00005 J5000 
00016 
00001 
»07120907180 
00005 -7000 



Q0005 
00005 
00005 
00005 
00005 
00005 
00005 
00005 
00005 



■7060 
'7080 
•7140 
7160 
'7020 
•7040 
•7100 
•7120 
•7180 



1 CYCLE ENTRY - WRITE 



DT 0023 
PN 2172366 
EC 412531 



05,31 



14500* 
U510* 
14520# 
14530» 
14540» 



IMPORTANT- 

IF THE OPERATION 
AN I-CYCLE ENTRY 
MUST BE PRESSED 



HANGS-UP IFAILS TO GIVE 
>»BOTH fieSET AND RELEASE 
SIMUtTANEOUSLY* THEN PRESS START 



14550 




D0R6 


START 




03616 








14560 


STARTl 


RCTY 






03636 


34 


00000 


00102 


14570 




RCTY 






03628 


34 


ooouo 


00102 


145S0 




WATY 


NEWNAM»f • 


TYPE PAPT 2 H^HE 


0S640 


39 




00100 


14590 


RT04A 


TFM 


RSTRT4-6»*»» 


LOAD RESTART APRS 


03652 


16 


00408 


-3652 


14600» 


READ-IN EVEN PARITY 


8*4 BITS 










14610 


RNTBT 


NOP 


R6B1 




03664 


41 


03712 


00000 


14620 




RA 


INVP-lfSOOtp 


5 « CARDt3 « PAPER 


TAPE 

03676 


37 


13790 


00500 


14630 




TDM 


INVP-2»0»ll 




03663 


15 


13789 


0000- 


14640 




TO 


INVP.INVP-1 




03700 


25 


13791 


13790 


14650 


R6B1 


TDM 


RNTB74.1»9«» 


CHANGE NOP TO B 


03712 


15 


03665 


00009 


14660 




&TM 


INDRST««+12*» 


RESET INDICATORS 


03724 


17 


02904 


->3736 


14670 




TD 


CYL3W*460 




03736 


25 


08548 


00460 


14660 




TD 


RDCFg460 




03748 


23 


10192 


00460 


14690 




TO 


$DCF»460t9 


INSERT DRIVE CODE 


03760 


25 


U854 


00460 


14700 




TD 


CYL0V«^60 




03772 


25 


13394 


00460 


14710 




TD 


SA80K»460 




03784 


25 


13622 


00460 


14720« 


















14730* 


»»*«CHECK AT CYL 03 






























14750 




TFM 


RSTRT46»*»» 


tOAD RESTART AORS 


03796 


16 


00408 


-3796 


14760 




TFM 


CYL34.5»600 




03608 


16 


03565 


«0600 


14770 




SK 


CYL3c*» 


SEEK CYL 03 


03820 


34 


03^60 


00701 


14780 




8C1 


*-12 




03832 


46 


03820 


00100 


1,4790 




RCTY 






Q3S44 


34 


00000 


00102 


14800 




WATY 


TSWC31««« 


CHK HEADS AT CYt 03 


03856 


39 


03441 


00100 


14810 




8TM 


YESNOtPSWtf 


GET ANSWER 


03866 


17 


02996 


-3167 


14920 




BNR 


•♦20i,PSWt» 


RM « YES 


03880 


45 


03900 


03167 


14830 




B7 


WLP9«9 




03892 


49 


03960 


OOCOO 


14840 




0TM 


ERRNfl67 




03900 


17 


03220 


'-0167 


14850 




SNC2 


RSTRT 




03912 


47 


00402 


00200 


14960 




8TM 


R£FN»52ti0f 


GO TYPE REF K 


03924 


17 


03164 


000N2 


14S70 




H 






03936 


46 


00000 


00000 


14680 


ZER06 


PC 


10»0t» 




03947 


00010 




14890 




BC4 


RSTRT 




039^*8 


46 


00402 


00400 


14900* 


















14910 


WLP 


BTM 


REFNt51«10* 


GO TYPE REF J 


03960 


17 


03164 


OOONl 


14920 




H 






03972 


48 


00000 


00000 


14930 




TFM 


R$TRT+6*« 




03984 


16 


00408 


-3984 


14940 




BTM 


TYPEfE£6 .» 


TYPE m I-CYCLE ENTRY 


















03996 


17 


03096 


-4465 


14950 


WLPl 


CM 


*4.11#0»10« 


TURN ON E/E 


04008 


14 


04019 


000-0 


14960 




WDN 


DCfSC0«»« 


WON ($C « 01 


04020 


38 


03588 


00702 


14970 




BE 






04032 


46 


04092 


01200 



DT 0023 
PN 2172366 
EC 412531 



u9ao 


BIN 










03 220 


■ 


14990 


WOM 


0CFSC0*«e ■ 


Mm i$c 01 




3@ 


03Sli8 


U0T02 - 


15000 


BNC2 


»-12 






47 


04056 


00200 


L5010 




RSTRT 




04080 


49 


00402 


00000 


15020* 
















15030 Wt>>2 


CM 


«4.1U0fl0 




04092 


14 


04103 


000-0 


[50iiO 


WON 


A0R5CK«»» 


WDH {APRS CHKI 


04104 


38 


03574 


00702 


15050 


BE 


W42 




04116 


46 


04176 


01200 


[5060 


8TH 


£RRN»201tt 


TYPE ERROR 


04ias 


17 


03220 


-0201 


15070 


WDN 


AORSCKftf 


WDN <ADRS CHKI 


04140 


36 


03574 


00702 


150S0 


8NC2 


♦-12 






4? 




00200 


15090 


B 


RSTRT 




04164 


49 


00402 


00000 


15100* 




TURN ON SWITCHES 












5110 W42 




♦4.12f3600 




04176 


46 


04188 


03600. 


15120* 














5130 


TFM 


CYL3W+5»600 




04188 


16 


005^3 


«0600 


.514^0 ¥LP3 


CH 


«^-ll»0*10 




04200 


14 


04211 


000-0 


5150 


mn 


CYL3W»*» 


WTN (MORMALI 


04212 


38 


08546 


00706 


5160 


ag 






04224 


46 


04264 


01200 


.5i?0 


8TM 


ERRN»202«» 


TYPE ERROR 


04236 


17 


03220 


-0202 


3180 


WTN 


CYL3W»#f 


MTN f NORMAL 1 


04246 


38 


08548 


00706 


.5190 


BNC2 


*-12 




04260 


47 


04248 


00200 


5200 


8 


RSTRT 




04272 


49 


00402 


00000 


5210* 
















5220 Wtl>4 


CM 


*+ll»0»10 




04284 


14 


04295 


000-0 


5230 


CTN 


CYL3W«t» 


CTM 1 NORMAL ) 


04296 


36 


08548 


00707 


5240 


Be 


WLP5 




04308 


46 


04368 


01200 


3250 


8TM 


ERRf^»203tf 


TYPE ERROR 


04320 


17 


03220 


-0203 


5260 


CTN 


CYt3Wt»» 


CTN (NORMAL) 


04332 


36 


08548 


00707 


.5270 


SNC2 


»«i2 




04344 


47 


04332 


00200 


.52S0 


B 


RSTRT 




04356 


49 


00402 


00000 


.5290# 














t53O0 Mtf»5 


CM 


*'t'll«09l0 




04368 


14 


04379 


000-0 ! 


15310 


to 


RDAREA4'2100«DATAA»9 


INSERT GM 


04380 


25 


17100 


00811 


3320 




CY'.3tt». 


WLR OP (NORMAL) 


04392 


36 


03560 


00704 


3330 


BE 


RT05 




04404 


46 


04496 


01200 


3340 


BTM 


£RRNft204*t 


TYPE ERROR 


04416 


17 


03220 


-0204 


15-350 


RTGN 


CYL3t»t 


WLR OP < NORMAL) 


04426 


36 


03560 


00704 


15360 


8NC2 


*-12 * 




04440 


47 


04428 


00200 


3370 


B 


RSTRT 




04452 


49 


00402 


00000 



5380* 

5190* ■ ■ " ■ . 

5400 226 PAC 16*-WR 1-CYC ENTRY* 04465 00032 



5410* 
5420* 

5430* THIS ROUTINE CHECKS THAT THE WRITE TRANSLATOR OR 

5440* FBR OUTPUT GATING *SERIALUER« CIRCUITRY IS FUNCTIONING* 

5450* 2100 EVEN PARITY 8-4 BITS ARE WRITTEN TO THE DISK* THERE 

5460* THE BITS 60 THROUGH THE WRITE TRANSLATOR WHICH BLOCK THE 

5470* 8-4 BITS* THEREFORE ONLY SI AND S2 BITS ARE WRITTEN ♦EXCEPT 

5480* FOR THE FIRST ADDRESS DIGIT WHICH IS C82 BITS* • WHEN THE 



Ur 0023 
PN 2172366 
EC 412531 



Q5.33 





m 














rtAiGR 




m 










Af^'s BIT L"« 




i S 




15510« 


SHORT gi> IT mix. SHOI;^ 
















15520* 


ALSO READ AND WRITE 


pmvtY li 


ATCHiS 


Ar«lE CHECKED. 








15530» 




















15340 RT05 


TFM 


RSTRT+6«**» 


LOAD i 


RESTAR 


T kORS 


04496 


16 


00408 


-4496 


15550 


BTM 


TYPE«22ie»» 


TYPE 1 


BLANK 


XFER 


04308 


17 


03096 


-5479 


15560* 


GENERATE 2100 CHARACTERS 














15570 R7A1 


TFM 


CYL34-5.600 








04520 

w «r Ita V 


16 


03i>65 


-U600 


15580 


TF 


CYL3W+5»*-ltt 


IHITI, 


ALIZE 




04532 


26 


08553 


04531 


15990 R7A3 


TF 


BOXXtlNVP 








04544 


26 




A 9 1 w k 


15490 


BTM 


6ENXt*-fl2»* 


GENERATE 2100 4»8 


BITS 




















04556 


17 


V ^ w a» 4h 


"» ^ O V 


15610 


ftTM 


INDRST9*4l2f • 


RESET 


INDICATORS 


0456S 


17 




«4')fi rt 


15620 R7D2 


BTM 


R$TRDA»*f» 


RESET 


^EAD 


AREA 


04560 


17 


u V 7 vl ' 


""H V O W 


15630 


BTM 


INDRST«»« 


RESET 


INDICATORS 


04592 


17 




4»nOAn 


15640* 


WRITE DISK TRACK 
















15650 


WTN 


CYL3W»t» 


WRITE 


ONLY 


31 AND 


S2 BITS 

04604 


38 


W w ^ ~ W 




15660 


BCl 


♦-12 








04616 


46 


04A04 

W ^ W w 


00 100 


15670* 


CHECK THAT WR CHK CAME ON 














15660 


BI 


R701t700 








04628 


46 


05272 


00700 

WV 1 V w 


15690* 


READ TRACK AND FIND 


OUT WHY WR CHK 


WAS NOT TURNED ON 






15700 


BTM 


INDRST*** 


RESET 


INDICATORS 


04640 


17 


02904 


-0000 


15710 


RTN 


CYL3 








C4632 


36 


03560 


00 706 


15720 


BI 


R7D3#600 








04664 


46 


05236 


00600 


15730* 




CHECK FOR SELECT 


LOCK 














15740 R7SL 


SK 


CYL3W 








04676 


34 


06546 


00701 


15750 


BNI 


R7A4»3600»e» 








04686 


47 


05168 


03600 


15760* 




SELECT LOCK IS ON 
















15770 


BTM 


REFN»59f 10»» 








04700 


17 


03164 


000N9 


15760 


H 










04712 


48 


00000 


00000 


15790 


RON 


RESETf t» 








04724 


36 


03602 


00702 


1.5800 


WTN 


CYL3W 








04736 


38 


06348 


00706 


15810 


SK 


CYL3W 








04748 


34 


08548 


00701 


15820 


AM 


*49tl»810 








04760 


11 


04769 


0-0-1 


15830 


BV 


R7SLE 








04772 


46 


04986 


01400 

V * ▼ w w 


15840 


BNI 


*-48«3600»»f 








04784 


47 


04736 


w «y W w w 


15850 


BTM 


REFN*62»l0»f 








04796 


17 


03 164 


00002 


15860 


H 










04S08 


48 


00000 


00000 


15870 R7SL1 


RON 


RESET»t» 








04320 


36 


V (? V c> 


Vw 1 


15680 


WTN 


CYL3W 








04632 


38 


08546 


00706 


15890 


SK 


CYL3W 








04844 


34 


08548 


00701 


15900 


BI 


R7SL2-24»3600»*» 








04856 


46 


04892 


03600 


15910 


BTM 


ERRN#170»# 








04668 


17 


03220 


-0170 


15920 


8 


R7$L3«*» 








04880 


49 


05084 


00000 


15930 


BTM 


R£FNf63f»10»« 








04892 


17 


03164 


00003 


15940 


H 










049f4 


48 


00000 


00000 


15950 R7SL2 


RON 


RESET 








04916 


36 


03602 


00702 


15960 


WTN 


CYL3W 








04928 


38 


08548 


00706 


19970 


SK 


CYL3W 








04940 


34 


08:;48 


00701 



DT 0023 

PN 2172366 
EC 412531 




16010 R7SLE 

14020 

16030 

16040 

16050 

16060 

16070 

16080 

16090 RtSLJ 

16100 
16110 
16120 
16130 
16140 
16150 

16160 RTA4 
16170 

16180 TBIT 
16190 
16200 
16210 

16220 nit>$ 

16230 

16240 

16250 R701 

16260* 

16270 

16280 

16290 

16300 

16310 

16320 

16330* 

16340 BNfl 

16350 

16360 

16370 

16380 BNI2 
16390 

16400 

16410 

16420» 

16430 

16440 

16450» 

16460* 

164T0* 

164i0« 



if 














Bin 










0322G 


—0 171 


B 






C'^ 'I' 






c.n^*Q0 


niH 


CYLS 






36 


03561 


00706 


BK 


CYL3 




■ 05000 


34 


03560 


00701 


AM 


*+9fl#S10 




05012 


11 


05021 


0~0-l 


8V 


*+24 




05024 


46 


05048 


01400' 


8NI 


R7Al»3600»« 




05036 


47 


04520 


03600 


0TM 


REFN»43»10» 




05048 


17 


03164 


000M3 


H 






05060 


46 


00000 


00000 


B 


*-12 




05072 


49 


05060 


00000 


BC2 


«-t-46t«f 




05084 


46 


05132 


00200 


RON 


RESET»»» 




05096 


36 


03602 


00702 


WTN 


CYU3W»f» 




05108 


33 


08548 


00706 


B 


*~36*«» 




05120 


49 


05084 


00000 


BTM 


REFN»69»10»t 




05132 


17 


03164 


00009 


N 






05144 


46 


00000 


00000 


3 


RT05 




05156 


4? 


04496 


00000 


BTM 


ERRN»2l0»711»»t 




05168 


17 


03220 


-021- 


TD 


19999tRDAREA+7 




05180 


25 


19999 


15007 


WATY 


BIT#t» 


TYPE FAILING BIT 


05192 


39 


05465 


00100 


PNTY 


19999»»» 


TYPE BIT 


05204 


35 


19999 


00100 


TFM 


19999»0t» 


RESET DUMP AREA 


05216 


16 


19999 


-0000 


67 


RE3 




05228 


49 


07830 


00000 


BTM 


ERRN*211*« 


60 TYPE ERROR 


05236 


17 


03220 


«-021l 


BNC2 


R702 




05248 


47 


04580 


00200' 


B 


RSTRT 




05260 


49 


00402 


00000 


BTM 


RSTIND»«» 


RESET INDICATORS 


05272 


17 


02904 


-0000 


READ TRACK BACK INTO 


CORE 










RTN 


CYL3 




05284 


36 


03560 


00706 


BCl 


#~12 




05296 


46 


05284 


00100 


BI . 


BN!1*600 




05308 


46 


05356 


00600 


BTM 


ERRN»212»» 


60 TYPE ERROR 


05320 


17 


03220 


-0212 


BNC2 


R7D2 




05332 


47 


04560 


00200 


B 


RSTRT 




05344 


49 


00402 


00000 


CHECK DATA READ 












Bt 


••►4/^»1600f • 




V 7^ V 






A 1 Ann 


BTM 


ERRN»2l3f711,«» 




05368 


17 


03220 


«021L 


TO 


19999.R0AREA+6 


■ . ■ . ■ ; ' ■ 


05380 


25 


19999 


15006 


87 


TBIT 




05392 


49 


05192 


00000 


B! 


*<f44»l700»» 




05400 


46 


05444 


01700 


BTM 


ERRN»214f711»t» 




05412 


17 


03220 


-021M 


TD 


19999»RDAR€A4.7 




05424 


25 


19999 


15007 


87 


TBIT 




05436 


49 


05192 


00000 


BC4 


R7A1 




05444 


46 


04520 


00400 


B7 


RT06 




05456 


49 


05502 


00000 



DATA AND CONSTANTS 



or 0023 
PN 2172366 
EC 412531 



05.35 



16490 BIT 
16!^00 2216 
16$10# 
16520* 
16530* 

16550* 
16560* 

16570* 

16580* 

16590* 

16600* 

16610* 

16620* 

16630* 

16640* 

16650* 

16660* 

16670* 

16680* 

16690* 

16700* 

16710* 

16720* 

16730* 

167'%0# 

16750* 

16760* 

16770* 

16780* 

16790* 

16800* 

16il0» 

imiO RT06 

16^30 

16840 

16850 

16860 

16870 

16380 

16890 

16900 

16910 

16920 

16930* 

16940 RT06A 

16950 

16960 

16970 

16980 

16990 



OAC l.2«)*-BLA?«g. /cr-ERc 00il^4 



THIS ROUTINE CHECKS FOR CORRECT DATA TRANSFER 

1«RD/WR DISK TRACK INSTRUCTION IS USED* 

2.N0 DISTINCTION IS MADE BETWEEN SECTOR 
ADDRESS AND DATA. THAT IS THE DATA 
RECORD AND INDELIBLE ADDRESS CONTAIN 
THE SAME CHARACTERS. 

3»TH€ WRITE ADDRESS SWITCH AND COHPARE 
DISABLE SWITCH MUST BE ON II OUT U 

4. 2100 CHARACTERS ARE WRITTEN AND READ. 

DATA IS WRITTEN AND IS READ BACK» AND 
THEN THE TWO RECORDS ARE COMPARED 
ONLY THE FIRST 105 CHAR OF DATA 
RECORDS ARE COMPARED* THIS IS BECAUSE 
WR CHK DISCONNECTS AND RTN WILL READ 
BACK THE COMPLETE RECORD* 

6»DATA RECORDS- 





PHASE 


DATA 












A 


11 












B 


FLAG 22 












C 


44 












D 


FLAG 86 












E 


FLAG 00 












F 


RM 












G 


FLAG RM 












H 


NUM 6LHK 












I 


FLAG GM 










TFM 


RSTRT-»-6f»»» 


LOAD RESTART 


05502 


16 


00408 


-5502 


BTM 


TYPE»227 •» 


TYPE WR/RD DATA XFER 


05514 


17 


03096 


-8485 


SF 


SFS 




05526 


32 


08537 


00000 


SF 


SFS-M 




05538 


32 


08538 


00000 


SF 


SFS+6 




05550 


32 


08543 


00000 


SF 


SFS+7 




05562 


32 


C8544 


00000 


TF 


WRM»2210 




05574 


26 


08699 


03947 


TF 


EVM»2210 




05506 


26 


08709 


03947 


TF 


ODM»Z210f» 


RESET DATA 


05598 


26 


08719 


03947 


TF 


RDM»2210»« 


TRANSFER MAPS 


05610 


26 


08729 


03947 


TF 


XFM*Z210 




05622 


26 


08739 


03947 


INITIALI2E FOR DATA 


TRANSFER 










TFM 


CYL3'f5»600*f 


SET UP FOR CYL 03 


056? \ 


16 


03565 


-0600 


TFM 


WRMl-t>6»WRM-8 




05646 


16 


05796 


-8691 


TFM 


€VMl+6»EVM-8 




05658 


16 


05868 


-8701 


TFM 


ODM14-6«ODM-8* i 


INITIALIZE TDM-S 


05670 


16 


05904 


-8711 


TFM 


R0Ml4>6#RDM-6 




05682 


16 


05940 


-8721 


TFM 


XFMl4-6*XFM-d 




05694 


16 


06176 


-8731 



or 0023 
PN 2172366 
EC 412531 



0s , m 



17000 


TFM 










C 72 > 




ITOlO R4F3 


TF 


iOXI»DATAX, 






lb 


08547 


'iiS' «fi Si, 


17020 


BTM 


GENX»«*12«» 


GO OEHERATi iim CHAR 05730 


17 


08022 


-5742 


17030» 


WRITE DISK TRACK 












170<^0 


TF 


CYt3W4.5tCYL3+5 






26 


08553 


U V 70 3 


17050 


BTM 


rNDRST»ft 


KtScT inOIViATunS 


0 ? 7 I? H 


IT 


02904 






WTN 


CYL3W 




05766 


38 


08548 


A rj 7 /It 


17070 


BN! 


#4'26*700»t 


vrlis rvfC wK i Tc vK 


05778 


47 


05802 


f»ft7fkrj 

W V 1 V w 


170A0 WPM1 


.TOW 


99999*1 




0579Q 


15 


99999 


UwvU 1 


17090 


TOM 


ERSWXtO 




U56U^ 


15 


05811 


UwUU V 


i f Xyfyf CndVA 


DS 


• ♦-2 




05811 


00000 




17110 


BTM 


RSTR0A»«+12 




058 1 6 


17 


08090 




171?0 


BTM 


INDRST»«t 


RESET INDICATORS 


05826 


17 


02904 




171'^0# 


READ DISK TRACK 












17140 


RTN 


CYl.3 




05638 


36 


03560 


A A "7 A ii. 

00 /Oo 




BNI 


»4.36»i600»» 


EVEN PARITY CK 


05850 


47 


05686 


01600 


17160 ^VMl 


TDM 


99999 tl 




05662 


15 


99999 


A no A 1 


17170 


TOM 


ERSWXftl 




05874 


15 


05811 


UUWV J> 




BNI 


*+36»1700»» 


ODD PARITY CK 


03886 


4? 


05922 


A 1 T A A 




TDM 


9999991 




05898 


15 


99999 


A A A A 1 


i • lit V V 


TDM 


ERSWX^l 




05910 


15 


05811 


A A A A 1 


17210 


BNI 


»'i-26»0600t« 


READ CHK 


05922 


47 


05946 


0U600. 


17220 fl&Ml 


TDM 


99999 »1 




05936 


15 


99999 


AA AA 1 


17230» 


COMPARE WRITE DATA 


WITH READ DATA 










17240 


BD 


XFM2»ERSWX»» 


CHK FOR PARITY ER 


■ NO COMPARE 














05946 


43 


06190 


A Si Q 1 1 


17250 


TF 


*+23»BOXX 




05958 


26 




A OCA 7 


17260 


SF 


**10»»» 




05970 


32 


05980 


A A A A A 


17270 


TFM 


^•faa^RDAREA-*-! 




05982 


16 


06005 


l«i AA 1 


17280 ft4Fl 


C 


*-13»RDAR£A4-lt» 


COMPARE 


05994 


24 


0598 1 


1 *iOn 1 

<l> WW Jk 


17290 


8NE 


XFMl 




06006 


47 


06170 


A 1 T A A 


17300 


AM 


R6F1-»'11»02»10 




06018 


11 


06005 




17310 


CM 


R6Fl4.11#RDAREA40l05f fCHK 1ST SCTR CMPRD 06030 


14 


06005 


J5105 


173ID 


0L 


R6F1 




06042 


47 


05994 


A 1 -an A 


17330 84f9 


AM 


R6F34.1U03»10 




06054 


11 


05729 


000-3 

V V V •tf' 


17340 


AM 


WRMl4.6f0Ul0 




06066 


11 


05796 


000-1 


17350 


AM 


EVM1-^6»01«10 




06078 


11 


05868 


000-1 


17360 


AM 


ODMl'«^6»01tl0f 


UPDATE TDM-S 


06090 


11 


05904 


000—1 

WW A 


17570 


AM 


J^D!5114-6»01»10 




06102 


11 


05940 


WWW — A 


17380 


AM 


XFMl+6»01flO 




06114 


11 


06176 


WWU X 


17390 


CM 


R6F3-H1»DATAX4.15 


•« CHK l»2*6«d*F BITS 


SENT 
















06126 


14 


05729 




17400 


BNE 


R6F3 




06138 


47 


05718 


At ? A A 
W X S. V V 


17^10 


BY 


♦♦12»»» 


TURN OFF OVFLO 


06150 


46 


06162 


01400 


17620 


S7 


RONB»»» 


60 SEND RMfGMfNUH 


BLANK 

06162 


49 


06222 


00000 


17630 XFWl 


TDM 


99999 f I 




06170 


15 


99999 


00001 


17660 


07 


R6F5 




06182 


49 


06054 


00000 


17650 XFM2 


TF 


♦♦18»XFMl*6 




06190 


26 


0620© 


06176 


17660 


TDM 


99999 #2 




06202 


15 


99999 


00002 


17670 




R6F5 




06216 


69 


06054 


ouooo 



m 0023 
PN 2172366 
£0 412531 



05.37 



17480* 

174«^0» 

17500» 

17510* 

17520* 

17530* 

175^0 KGNB 

17550 

17560 

17570* 

17580 
17590 
17600 
17610 

17620 

17630* 

17640 

17650 

17660 

17670 

17680 

17690 

17700 

17710* 

17720 

17730 R^Rl 
177<^0 

17750 
17760 
17770 

1170O R4R2 
17790 

17800 Rm 

17810 

17820 

17830* 

17840 R6R3 

17850 

17860 

17870* 

17880 R4CI 

17890 

17900 

17910 

17920 

17930* 

1T940 

17950 

17960 



WRITE-READ DISK TRACSC»2100 ^1^^ 



TFM 


RSTRT-»-6»«tf 


LOAD RESTART ADRS 


06222 


16 


00408 


-6222 


TF 


BOXX^DATAX-t-lS 




06234 


26 


08547 


03535 


BTM 


6ENX»*-^12»« 


GO GENERATE 2100RM 














06246 


17 


06022 


-6258 


WRITE DISK TRACK 












WTN 


CYL3W 




C6258 


38 


08348 


00706 


BNI 


*42'>f700»» 


WRITE CHK 


06270 


47 


06294 


00700 


TOM 


WRM-3f 1 




06282 


15 


08696 


00001 


BTM 


RSTRDA»»+12ft 


GO RESET READ AREA 














06294 


17 


06090 


-6306 


BTM 


INORST 




06306 


17 


02904 


-0000 


READ DISK TRACK 












RTN 


CYL3 




06318 


36 


03560 


00706 


BNI 


*'i-24*1600»f 


EVEN PARITY CK 


06330 


47 


06354 


01600 


TDM 


EVM-3«1 




06342 


15 


08706 


00001 


BNI 


«+24*l700»» 


ODD PARITY CK 


06334 


47 


06378 


01700 


TDM 


0DM-3»1 




06366 


15 


08716 


00001 


BNI 


*424*0600«» 


READ CHK 


06378 


47 


06402 


00600 


TOM 


RDM-3»1 




06390 


15 


08726 


00001 


CHECK READ AREA FOR RM 












TFM 


♦•»'23»RDAREA 




06402 


16 


06425 


J5000 


TD 


BOX«RDAREA»* 


MOVE DATA 


06414 


25 


00805 


15000 


BNR 


R4R2»B0X«f 


CHK FOR RM 


06426 


45 


06470 


00805 


BNF 


*+20fB0X»» 


CHK FOR FLAG 


06438 


44 


06458 


00805 


B7 


Ri^R2 




06450 


49 


06470 


00000 


BNG 


R4R4»B0X*» 


CHK FOR GM 


06458 


55 


06490 


008Q5 


TDM 


XFM-3»1 




06470 


15 


08736 


00001 


B7 


R4R3 




06482 


49 


06526 


00000 


AM 


R4Rl+lle01 




06490 


11 


06425 


-0001 


CM 


R4R1-4-11.ROAREA4.0105 


•»CHK DONE 


06502 


14 


0642 5 


J5i05 


BL 


R4R1 




06514 


47 


06414 


01300 


WRITE-READ DISK 2100 


FLAG RM 










TFM 


RSTRT+6»»»t 


LOAD RESTART ADRS 


06526 


16 


00408 


-6526 


TF 


B0XX»DATAX+18 




0S538 


26 


08547 


08538 


BTM 

¥^ 


GENX.*+12»« 

tITE DISK TRACK 


GO GEN 2100 FL6 RM 


06550 


17 


08022 


-6562 


WTM 


CYL3W 




06562 


3S 


08548 


00706 


BNI 


•424>0700»« 


WRITE CHK 


06574 


47 


06598 


00700 


TDM 


WRM-2»1 




06586 


15 


08697 


00001 


BTM 


RSTRDA»«+12»» 


GO RESET READ AREA 


06598 


17 


08090 


-6610 


BTM 


IN0RST**+12«t 


RESET INDICATORS 


06610 


i7 


02904 


-6622 


READ DISK TRACK 












RTN 


CYt3 




06622 


36 


03560 


00706 


BNI 


»424fl600»« 


EVEN PARITY 


06634 


47 


06658 


01600 


TDM 


EVM-'2tl 




06646 


15 


08707 


00001 



DT 0023 
PN 2172366 
EC 412531 



F970 


BHl 


^*24fl?0@©^ 






%f 


06682 


01700 


rfso 




O0M"2#i 






13 


08717 






mi 




mm cbk; .. 




47 


06706 


00600 


1000 


TOM 


RDN'"2»1 




06694 


15 


08727 


00001 


lOlO* 


CHECK READ AREA FOR 


FLAG RM 










J020 


TFM 


♦*23»RDAREA 




06706 


16 


06729 


J5000 


1030 R4C2 


TO 


BOX * ROAR EA«t 




06718 


25 


00805 


15000 


1040 


5NR 




CHK FOR S»2 BITS 


06730 


45 


06766 


00805 


}050 


BNF 


♦•t-24t60X** 


CHK FOR F BIT 


06742 


44 


06766 




1060 


BN6 


R4F6»B0X«* 


CHK FOR NOT 4»1 BITS 


06754 


55 


06786 


00805 


J070 


TOM 


XFM-2»1 




06766 


15 


08737 


00001 


loeo 


B7 


R4C6 




06778 


49 


06822 


00000 


J090 


AM 


R4C2+11»01»10 




06766 


11 


06729 


000-1 


1100 


CM 


R4C2-t-llfR0AREA40105«tSCAN CMl»LTE RO AREA 


0679G 


14 


06729 


J5105 


nio 


6L 


R4C2 




06810 


47 


06718 


01300 


















>130* 


MRITE - REAO DISK TRACK #2 100 NUM BL.NK 










n40» 


TFM 


R5TRT4-69*** 


LOAD HcSTART AORS 


06822 


16 


00408 


-6822 


1160 


Tf 


BOXX»0ATAX+21 




06634 


26 


08547 


08541 


1170 


BTM 


GENX»«'»'l2t» 


GO GEN 2100 NUM BLK 


06846 


17 


08022 


-6858 


I180» 


WRITE DISK TRACK 












J190 R4C7 


W.TN 


CYL3W 




06858 


36 


08548 


00706 


1200 


BNI 


•4>24»0700»» 


WRITE CHK 


06870 


47 


06894 


C0700 


laio 


TOM 


WRM~1»1 




06832 


15 


08698 


00001 


1220 


BTM 


RSTRDA9»*12«9 


60 RESET REAO AREA 


06894 


17 


08090 


-6906 


(230 


BJM 


lNORST»e* 


RESET INDICATORS 


06906 


17 


02904 


-0000 


1240* 


READ 01 SK TRACK 












6250 


RTN 


CYL3 




06918 


36 


03560 


00706 


(2^0 


BNI 


«4-24f 1600»t 


MBR-E 


06930 


47 


06954 


01600 


mo 


TOM 


EVM-ltl 




06942 


15 


08708 


00001 




BHl 


»+24#l700»« 


MBR~0 


06954 


47 


06978 


01700 


1290 


TOM 


0DM~1»1 




06966 


15 


08718 


00001 


1300 


BNI 


•424»0600«f 


READ CHK 


06978 


47 


07002 


00600 


1310 


TDM 


RDM-Ul 




06990 


15 


08728 


00001 


I320# 


CHECK REAO AREA FOR 


NUMERIC BtANK - CS4 










1330 


TFM 


*4.239R0AREA 




07002 


16 


07025 


J5000 


1340 «4C9 


TO 


BOX«R0AREA 




07014 


25 


00805 


15000 


1350 


BNF 


*-»-20»BOX»f 


NO F BIT 


07026 


44 


07046 


00805 


13^0 


B7 


R4C8 




07038 


49 


07098 


00000 


1370 


IfO 


•-♦■ZOeBOX** 


a»4#2»0R 1 BIT 


07046 


43 


07066 


00805 


1300 


B7 


R4C8 




07058 


49 


07098 


00000 


J3f0 


BN6 


«<i>20»BOX»f 


NO 8f4»2i ANO 1 BIT 


07066 


55 


07086 


00805 


^400 


B7 


R4Ce 




07078 


49 


07098 


00000 


1410 


Bm 


R4F7»B0S»» 


NO B«2 BITS 


07086 


45 


07U8 


00805 


1420 R4C8 


T>M 


XFM-1«1 




07098 


15 


08738 


00001 


1^30 


B7 


R4F8 




07110 


49 


07154 


00000 


1440 Pl4r7 


AM 


R4C94'11,01»10 




07118 


11 


07025 


000-1 


1450 


CM 


R4C9<<>llfRI>AREA4>0|03»fSCAN REAO AREA 


07130 


14 


07025 


«I5105 


I4i0 


BL 


II4C9 




07142 


47 


07014 


01300 


I470» 

















UT 0023 
PN 2172366 
EC 4I2S31 



05.39 



£> V T V W 


- m 


lit mm mm. 












18490* 


















TFM 


RSTRT'».6»»©« 




071 (»A 


Y A 
iO 


AAA A A 


-.7 1 l« A 

— 1 15** 


18510 


TF 


B0XX»DATAX4.a4 




A7 1 AA 


7 A 
A O 




A ft A A A 


18520 


BTM 


6ENX»»+12»f 


GO G^H IIQQ FLG GM 


V f A 1 •# 


17 


Ofi022 


-7 IQO 
1 * 7 W 


18530 


BTM 


INDRST*** 


RESET INDICATORS 


07190 


17 
• f 


02Q04 

V A 7 WT 


•.AAA A 
V w W W 


18540* 


WRITE DISK TRACK 












16550 R4Ca 


WTN 


CYL3W 




07203 




AO AAA 


007A A 


18560 


BNI 


*+24t0700#« 




072 1 4 


47 


\l t m. S Q 


AA7A A 

u w r u V 


1 8570 


TDM 


WRMtl 




n7 9 9 A 


1 A 


Afi AQO 


A A A A 1 

UUUO 1 




BTM 


RSTR0A»*412»# 


V3U KXiiJCi nCAU AKCA 


n "t 5 IS Q 


1 / 


A d no A 


^7 0 C A 


18590 


BTM 


INDRST»*<fl2f t 






1 7 


A 7 Q AA 


»7 3 A 3 




READ DISK TRACK 














RTN 


CYL3 




U libC 


36 


A 9 C A A 
037O0 


A A t /% A 




BNI 


*+24*1600»# 


MdK— E 


«^ 

07274 


47 


/> -% *^ r> Q 

07298 


0160C 


t A JL 4 A 


TDM 


EVM»1 




07286 


15 


08709 


00001 


1 A A 


BNI 


*-i'24tl700»t 


MBR— 0 


072 8 


47 


07322 


C1700 




TDM 


00M»1 




U731W 


1 K. 




f\ f^, r\ 1 

UUUOl 


1 ft AAA 


BNI 


*-f24»0600»« 


READ CK 


W 1 S€.C 


A f 

4 f 


A "7 '1 A A 

U 1 i4o 


A r\ A ^ A 
OUoOO 


1AA7A 


TOM 


RDM»1 






1 A 


Uo # ^ 7 


An A A 1 
UUUUl 




CHECK READ AREA FOR 


FLAG GM 










18490 


TFM 


*4.23*RDAREA 




n7'4AA 
U f ^*^o 


1 A 


A711AQ 


1 A A A A 

JPUU u 


18700 R4C!4 


TO 


BOXvRDAREA 








AAA A A 


1 A AAA 
X 7 UU U 


18710 


BWF 


R4C5»B0X** 


CHK FOR FLAG 


D7 7 A 






A ft n A A 
UU 0 u ? 


18720 


BNG 


R4C3»B0Xf t 


CHK FOR GM 


V f «7 W b 




A7&jifi 


AOft A A 
U w 0 U 


187S0 


AM 


R4C4+ll»0lel0 




W 1 J 7 H 


1 1 


A70 AO 


AAA„ -. 
WWW"" X 


18740 


CM 


R4C4'f>ll*RDAREA^0l05*fSCAN RD AREA 


07406 


14 


07369 


J5105 


18750 


btl 


R4C4 




A7A1 A 


A7 


A7 '4 A A 


A 1 HA A 
U X ^U U 


18760 


87 


R4F9 




n7A'5lo 




n7A An 


A AAA A 
U wUU u 


18770 04^5 


TDM 


XFM*1 




w r *f JO 




AA7^Q 


A AAA 1 
UUUU X 


































% lia AA« 


















TFM 


*+23»WRM-8 






1 A 


0 #4 #3 


— ooVi 


1 ftfl90 


&D 


DI6FND«99999«t 


SCAN MAPS FOR DIG • 




A9 


A7 AH A 


00000 
77777 


1 flfl tA 


AM 


•-ItOl.lO 




W f 474 


1 1 


A T A T -a 

074 #3 


AAA 1 

UUO— 1 




CM 


*-l3»XFM*l»f 


CHK SCAN DONE 


w r4oo 


14 


A "7 A 7 ^ 
0 1 4 # 3 


— OTA A 

—o /40 


lAAiLA 


BNE 


♦-36 




ATA OA 


A Tf 
4 f 


A "> A A ■> 


A 1 5 rt A 


1 A A A A 
1900U 


BC4 


RT06-»-24 




ATA 1 n 

07510 


A £ 

46 


'/\ c c ^ ^ 

05526 


00400 


IAAYA 

lov fu 


B7 


RT6A 




07522 


A B 

49 


n A A A 

06740 


00000 


4 A A A A A 

18880* 
















1 A AO AA. 


ERROR CONDITION HAS 


BEEN FOUND 










18900* 


OUTPUT ERROR MAPS# 


I » ERROR 










18910* 
















18920 Dt6FM0 


BTM 


ERRNf220«7llf f 




07530 


17 


03220 


-022- 


18930 


RCTY 






07542 


34 


00000 


00102 


18940 


SPTY 






07554 


34 


00000 


00101 


18950 


SPTY 






07566 


34 


00000 


00101 


18960 


TO 


19991 tOATAX 




07578 


25 


19991 


08520 


18970 


TO 


19992 «DATAX-i>3 




07590 


25 


19992 


08523 



m 0023 
PN 2172366 
EC 412531 



03 ®,40 



18980 

10990 

19000 

19010 

19020 

19030 

190^0 

19050 

19060 

19070 

19080 

19090 . 

19100 REl 

19110 

19120 

19130 

19140 

19190 

19160 

19170* 



19430# 
19440* 
19^*0 

194*0 GCNK 

19470 

I94i0 



TO 


19993 fMTAIC'^^ 




0T602 


25 


■19993 


08526 


TD 


19994 fOATAX-i-f 




07614 


25 


19994 


08529 


TD 


l9995t0ATAX*i2f ® 


MOVE DATA 


07626 


25 


19995 


08532 


TO 


19996 •DATAX'9- 15 




07638 


25 


19996 


08535 


TO 


19997»0ATAX+18 




07650 


25 


19997 


08538 


TD 


19998fDATAX-f21 




07662 


25 


19998 


08541 


TD 


19999 •DATAX'l-24 




07674 


25 


19999 


08544 


DHTY 


19991#»» 


DUMP HEADING 


07686 


35 


19991 


OOlOO 


TFM 


RE1411»WRM 




07698 


16 


07757 


-8699 


TFM 


RE1-6*V£RT0 




07710 


16 


07740 


-8661 


RCTY 






07722 


34 


00000 


00102 


WATY 


99999#*» 


TYPE LABEL 


07734 


39 


99999 


00100 


TF 


19999*99999 




07746 


26 


19999 


99999 


ONTY 


19991»*» 


DUMP ERROR MAPS 


07758 


35 


19991 


00100 


AM 


REltlltOlOflO 




07770 


11 


07757 


OOOJO 


AM 


Rei-06*06fl0 




07782 


11 


07740 


000-6 


CM 


REl+llfXFM+10#t 


CHIC DONE 


07794 


14 


07757 


-8749 


BHE 


REl-24 




07806 


47 


07722 


01200 


TFM 


19999t0»« 


RESET DUMP AREA 


07818 


16 


19999 


-OCOO 



19180* 


REQUEST AND ACCEPT 


DIGIT FOR WR-RD 










19190* 














19200 RE3 


TFM RSTRT'»'6»*»» 


LOAD RESTART 


07830 


16 


00408 


-7830 


19210 


RCTY 




07842 


34 


00000 


00102 


19220 


WATY GETDttt 


REQUEST DATA 


07854 


39 


08591 


00100 


19230 


RNTY B0XX-1»»» 


ACCEPT DIGIT 


07866 


36 


08546 


00100 


19240 


TD B0XX»B0XX-1 




07878 


25 


08547 


08546 


19250 


TDM BOXX-2»0»ll 




07890 


15 


08545 


0000- 


19260* 


60 GENERATE 2100 CHARACTERS 








19270 


BTM 6ENX»*4-12 




07902 


17 


08022 


-7914 


19290 RE2 


BTM INDRST»»f 


RESET INDICATORS 


07914 


17 


02904 


-0000 


19290* 


WRITE DISK TRACK 










19300 


WTN CYL3W 




07926 


38 


08548 


00706 


19310* • 


READ DISK. TRACK 












19320 


BTM INDRST*tf 


RESET INDICATORS 


0793B 


17 


02904 


-0000 


19330 


RTN CYL3 




07950 


36 


03560 


00706 


19340* 














19390 


BCl RE2 




07962 


46 


07914 


00100 


19360 


BTM lt4£R>45f« 


OUTPUT READ DATA 


07974 


17 


08158 


-0045 


19370* 














19380 


BC4 RE2 




07986 


46 


07914 


00400 


19390 


BNC2 RE3 




07998 


47 


07830 


00200 


19400 


B7 RT05 




08010 


49 


04496 


00000 


19410* 












19420* 


GENERATOR ROUTINE 


FOR GENERATING 











THE 2100 CHAR RECORDS 
OS 9 

TFM *+18»WRAR£A-»-2099 
TF WR AR£A^2 099 iBOXX t • 
SM *-*6f02«10 



INSERT 2 CHAR f IElO 



08021 00005 

08022 16 08040 J9299 
08034 26 19299 08547 
08046 12 08040 000-^2 



DT 0023 
PN 2172366 
EC 412531 













20Q00 NEWNAW 


DAC 


. 1@»pA.RT 2 OF OT 0023* 


08449 


00036 


9 tint n ftt 


l/At 


4 1 f ""WR/Kw DATA ArtK' 


084@3 


00034 


20020 DATAX 


OC 


03t01l 


08520 


00003 




OC • 


01»0 


08521 


00001 


20040 


DC 


02»-22 


08523 


00002 


20050 


OC 


03 #44 


08526 


00003 


20060 


OC 


01»0 


08527 


00001 


20070 


OC 


O2»-0$ 


08529 


00002 


20080 


DC 


01»0 


08530 


00001 


20090 


DC 


02 •-00 


08532 


00002 


20100 


OC 


0l#0 


08533 


00001 


20110 


DC 


01#« 


08534 


00001 


D A « 4 ft 

20120 


'DC 


ft t ■ 

01»« 


06535 


00001 


fc w * 


-fur 


V * ♦ V 


06536 


00001 


20140 SrS 


DC 


Oi»« 


08537 


00001 


'it^t &A 


DC 


01 » • 


08538 


00001 




vv. 


A t ^ A 


08539 


00001 


«vl f u 




02 


08541 


00002 




Pv 


vl»U 


08542 


00001 








08543 


00001 


9A9Afl 






08544 


00001 


90710 Rnyv 




O^kO 


ft c c /. ** 

06547 


00003 


202^0 I!:Y1 9W 




* 1 *999Q9*090*URAnPA 

• A • ' ▼ ' ▼ ~ • W4. w # W f\ Wfl C A 


A fi d A O 


A A A A /. 








08554 


A A A tit' 

00003 








0855 / 


00005 


90?«0 TWP! 




0#i«MTM t 
vo # M 1 n * 


A S C iL 


00012 






ftfl ^ DTM a 
vO • K 1 W • 


08575 


00016 


907%0 7910 


Wo 


#<.C.r\UO 


ft H ft A t 

03947 


^ f*% f\ f\ f\ 

00000 


veil/ 




sictKCT in IfKf'KU 1/11911 ' 


A a K a 1 
Uo791 


A Aft /» /. 

00044 


20270 22« 


DAC 


13»-im HEAD MAP« 


0663§ 


00026 


202i® VERTO 


OAC 


03»W • 


08661 


00006 


2029§ 


DAC 


03#E • 


08667 


00006 


20300 


DAC 


03tO ♦ 


08673 


00006 


20310 


OAC 


03»R • 


08679 


00006 


20320 


OAC 


03»X ♦ 


08685 


00006 


20330 WRM 


OS 


10 


08699 


00010 


20340 EVM 


OS 


10 


06709 


00010 


20350 OOM 


OS 


10 


08719 


00010 


20360 Km 


OS 


10 . 


08729 


00010 


20370 xr« 

203@0» 


OS 


10 


08739 


00010 



2039O» 
20400* 
20410* 
20420* 
20430* 
20440* 
20450* 
20460* 
20470 f)T6A 



THIS ROUTINE CHECKS THAT DATA <Fl.A6 GMI 
CAH BE WRITTEN WITH EACH HEAD* 
AFTER THE DATA IS WRITTEN* IT IS READ BACK 
INTO CORE STORAGE AND A WRITE HEAD HAP 
1$ GENERATED* 0 « OKAYfl • ERROR 



1R9999 



TfM RStRT^6«*** 



LOAD RESTART ADRS 



08740 16 00408-8740 



DT 0023 
m 2172366 
EC 412531 



05.43 







(i ti I i^-, »■ i:... -j^ ■■•.= ' ':■ 










-8635 


20490 


IF 






y T 6 ■^^ 




tv "W* .ft' ™ J 


08 b44 


20500 


BTM 






Q®?76 


17 


08022 

^•9 w V an 


-8788 


20510 R6H1 


TFM 


CYL3+5f780 




08788 


16 


03565 


->078n 


20520 


TF 


19999f2ER010f f 


RESET MAP 


08800 


26 


19999 


02897 


20530 


TFM 


WRHD+6f 19999 




08812 


16 


08926 


J9999 


20540* 


WRITE DISK TRACK 












20550 WRHDl 


TF 


CYL3W+5»CYL3+5 




08824 


26 


08553 


03565 


20560 


WTN 


CYL3W 




w U w •* w 


3fi 


08548 


00706 


20570 


BTM 


INDRST*** 


RESET INDICATORS 




17 


02904 


w w V w 


20560* 


READ DATA BACK 












20590 


RTN 


CYL 3 




08860 


36 


03560 


00706 


20600 


ft 1 






08872 


46 


0S920 


00700 


20610 


O I 




CHECK FOR 


08884 


46 


08920 


00600 

w w w V w 


20620 


B! 


*424ik 1600* • 


ERROR 


08896 


46 


08920 


ni 600 


20630 


BN! 


«4>4B« 1 700 




08908 

W W T W W 


47 


V V T ^ O 




20640 WRHD 


TDM 


99999»1»» 


SET MAP 


08920 


15 


99999 


00001 

W V V W Jl 


20650 


TF 


19988fCYL3+5»» 


STORE SCTR ADRS 


08932 


26 


19988 


03565 


20660 


BTM 


INDRSTf ft 


RESET INDICATORS 


08944 


17 


02904 


W w V W 


20670 


sw 


MRHD46»01«10 




08956 


12 


08926 


000-1 


20680 


SM 


CYL3+5»20#10» 


DECR TO NEXT HD 


08968 


12 


03565 


oootco 

V W W rV W 


20690 


CM 


CYL3'^5»580t» 


CHK DONE 


08980 








20700 


6NE 


WRHDl 




08992 


47 


08824 


012O0 


20710» 
















20720 


TOM 


19989»0»11 




09004 


15 


19989 

A T y V 7 


V V w 


20730 


CM 


19999*0tl0» 


CHK WR HD MAP 


09016 


14 


19999 


000-0 


20740 


BNE 


R6H2 




09028 


47 


09060 


01200 


20750 


BC4 


RT6A*24 




09040 




08764 


n04nn 


20760 


B7 


RT07 




09052 


49 


09180 


00000 


20770* 
















20780 R6H2 


BTM 


ERRN«230t* 


TYPE ERROR NO* 


09060 


17 


03220 


-0230 


20790 


BCl 


*4A8 




09072 


46 


09120 


00100 


20800 


DNTY 


19990»»« 


DUMP MAP 


09084 


35 


19990 


00100 


20810 


TFM 


19999»0f • 


RESET DUMP AREA 


09096 


16 


19999 


-0000 


20820 


M 






09106 


48 


00000 


00000 


20830* 


DIAGNOSTIC LOOP 












20840 


TF 


CYL3W'i'5* 19988 




09120 


26 


08553 


19988 


20850 




CYL3W*ff 


WRITE TRACK 


09132 


38 


08548 


00706 


20860 


BCl 


*-12 




09144 


46 


09132 


00100 


20870 


BHC2 


RT6A4^24 




09156 


47 


08764 


00200 


20880 


B 


RSTRT 




09168 


49 


00402 


OQOOO 



20890* 
20900* 
20910* 
20920* 
20930* 
20940* 
20950* 
20960* 
20970* 
20980* 



THIS ROUTINE CHECKS THE COMPARE LATCH 

PHASE A ( CBA8421 BITS ) 
1* 2100 CHARACTERS ARE GENERATED ( FLAG GM ) 
2 • WRITE FULL TRACK ( HD 0»CYL 03 I 
3« READ BACK CHECK 
4. CHECK RBC IND 37 IS OFF 



DT 0023 
m 2172366 
EC 412531 



20990 RT07 


TFH 


RSTRT^-Sf**^ ■ 




0f IS© 


1 & 




-9180 


21000 


BTM 


TYPE»£2^ 


. TYPE .. COMf^Aig LATCH 




17 


03096 


J0631 


21010 


TFM 


CYl34.5i600 




09204 


U 


03565 


-0600 


21020 


TF 


CYL3W+5»*-l»t 


INSTIALI2E 


09216 


26 


06553 


09215 


21030* 


GENERATE 2100 FLAO 


GM 










21040 R7L1 


TF 


B0XX»DATAX*24 




09226 


26 


08547 


08544 


21050 


BTM 


GENX»*4-12»» 


GENERATE RECORD 


0924Q 


17 


060ii2 


-9252 


21060 


BTM 


!NDRST»»» 


RESET INOiCATORS 


09252 


17 


02904 


-0000 


21070» 


WRITE FULL TRACK 










21080 


WTN 


CYL3W 




09264 


38 


08548 


00706 


21090 


61 


«-24«1900 




09276 


46 


09252 


01900 


21100» 


REAO BACfC CHECK COMPARE 








21110 


CTN 


CYL3W 




09266 


36 


08546 


00707 


21120 


BNI 


R7A2»3700 




09300 


47 


09372 


03700 


21130 


BTM 


ERRN*2409i 


GO TYPE ERROR 


09312 


17 


03220 


-0240 


211^0 


CTH 


CYL3W 




09324 


36 


08548 


00707 


21150 


BCl 


*-12 




09336 


46 


09324 


00100 


21160 


8NC2 


R7LI 




09346 


47 


09226 


00200 


21170 


B 


RSTRT 




09360 


49 


00402 


00000 


21160 klM 


BTM 


1NDRST»»« 


RESET U4DICAT0RS 


09372 


17 


02904 


-0000 


21190* 














21200* 




DATA UNEQUAL- 


COMPARE LATCH 










21210* 


1* 


CHANGE ONE CHARACTER IN CORE 










21?20* 


2* 


READ BACK COMPARE 










21230* 


3« 


R8C I NO 37 SHOULD TURN ON 










21240* 
















21250* 
















21260 


TFM 


RSTRT+6f*»» 


LOAD RESTART ADRS 


09384 


16 


00408 


-9384 


21270 


TDM 


WRAREA+1050»0*» 


CHANGE DATA 


09396 


15 


18250 


00000 


21280 R7X4 


BTM 


INDRSTf** 


RESET INDICATORS 


09406 


17 


02904 


-0000 


21290* 


READ BACK COMPARE 










21300 


CTH 


CYL3VI 




09420 


36 


08548 


00707 


21310 


BI 


R7XU3700», 


IND SHD HAVE BEEN ON 


09432 


46 


09600 


03700 


21320* 


EITHER THE I NO WONT 


TURN ON OR THE INSTRUCTION FAILED 






21330* 


TRY ANOTHER WAY TO 


TURN ON THE INDICATORS 










21340 R7X3 


BTM 


INDRST»»« 


RESET INDICATORS 


09444 


17 


02904 


-0000 


21350 


RTGN 


CYL3W»«» 


READ TRACKtWLR OP 


09456 


36 


08548 


00704 


21360 


Bl 


R7X2«3700 




09466 


46 


09540 


03700 


21370 


BTM 


ERRN»241»9 


XNOICATOR FAILED 


09480 


17 


03220 


-0241 


21380 


RTGN 


CYL3W 




09492 


36 


08548 


00704 


21390 


BCl 


*-l2 




09504 


46 


09492 


OOlOO 


21400 


BNC2 


R7X3 




09516 


47 


09444 


00200 


21410 


"B 


RSTRT 




09528 


49 


00402 


OOOOO 


21420 R7X2 


BTM 


£RRN»242»9 


COMPARE LATCH FAILED 


09540 


17 


03220 


-0242 


21430 


CTN 


CYL3W 




09552 


36 


08546 


00707 


21440 


BCi 


*-12 




09564 


46 


09552 


00100 


2U50 


BNC2 


R7X4 




09576 


47 


09408 


00200 


21460 


B 


RSTRT 




09566 


49 


00402 


OOOOO 


21470 R7X1 


BC4 


RT07*24 




09600 


46 


09204 


00400 


21480* 
















21490* 

















m 0023 
PN 2172366 
EG 412531 



05«45 



21500* 
21510* 
21520* 
21530* 
2154^0* 
21550* 
21560* 
21570* 
21580* 



THE SECTOR ADDRESSES 
ON CYLINDER 03. THE FIRST 5 DIGITS OF 
THE SECTOR RECORD IS A DUPLICATE OF THE 
SECTOR ADDRESS* THE REST OF THE RECORD SS 
00112233445566778899 



21590 


REST6 


TFM 


RSTRT+6#*»» 


LOAD RESTART AORS 


09612 


10 


00406 


-9612 


21600 




BTM 


TYPEtZZlOff 


TYPE RESTORE SCTR 


ADDRESSES 
















09624 


17 


03096 


J0661 


21610 




TFM 


»+18»WRAREA 




09636 


16 


09654 


J7200 


21620 




TR 


99999»RESDATf t 


MOVE DATA 


09646 


31 


99999 


10206 


21630 




AM 


*-06»105 




09660 


11 


09654 


-0105 


21640 




CM 


*-18»WRAREA4-2100f « 


CHK DONE 


09672 


14 


09654 


J9300 


21650 




BNE 


*«36 




09684 


47 


09648 


01200 


21660 




TFM 


R6SA*600 




09696 


16 


08176 


-0600 


21670 




TF 


CYL3W"»-5»R6SA 




C9708 


26 


08553 


08176 


21680* 


INSERT SECTOR ADDRESSES 










21690 




TFM 


*+18*WRAREA+4 




09720 


16 


09738 


J7204 


21700 


R6S1 


TF 


99999»R6SA» • 


INSERT SCTR ADRS 


09732 


26 


99999 


08176 


21710 




TF 


R6S2'«'6«R6Sl + 6 




09744 


26 


09774 


09738 


21720 




AM 


R6S2+6»05»10 




09756 


11 


09774 


000-5 


21730 


R6S2 


TF 


99999»R6SA»» 


DUPLICATE SCTR ADRS 09768 


26 


99999 


08176 


21740 




TF 


*+30»R6Sl-»'6 




09780 


26 


09810 


09738 


21750 




SM 


*+18»04»10 




09792 


12 


09810 


000-*^ 


21760 




CF 


99999#»» 


CLEAR FLAG ON SCTR 


ADRS 


















09804 


33 


9S999 


00000 


21770 




AM 


R6SA»0ifl0 




09816 


11 


08176 


000-1 


21780 




AM 


R6Sl+6tl05 




09828 


11 


09738 


-0105 


21790 




CM 


R6S14-6»WRAREA42104 




09840 


14 


09738 


J9304 


21B00 




BNE 


R6S1 




09852 


47 


09732 


01200 


21810 




BTM 


lNDRSTf*^12»t 


RESET INDICATORS 


09864 


17 


02904 


-9876 


21820 




SK 


CYL3W«»f 




09876 


34 


08548 


00701 


21830 




WTN 


CYL3W 




09868 


38 


08546 


00706 


21640 




B1 


*-36»1900 




09900 


46 


09864 


01900 


21850 




AM 


CYL3W+5»20 




0?912 


11 


08553 


-0020 


21860 




CM 


CYt3W45«800»t 


CHK ALL SCTR ADRS 


DONE 

09924 


14 


08553 


-0800 


21070 




BNE 


R6Sl~12 




09936 


47 


09720 


01200 


21880 




rc4 


REST6424 




09948 


46 


09636 


00400 



21890* 
21900* 
21910* 
21920* 
21930* 
21940* 
21950* 
21960* 
21970* 



PHASE A <RDN - SINGLE SECTOR) 
THIS ROUTINE CHECKS THAT EACH SECTOR ON A 
TRACK (HEAD 0) CAN BE READ. EACH SECTOR IS 
READ WITH A READ DISK NUMERIC (RDN) INSTRUCTION. 
EACH SECTOR ADDRESS IS DUPLICATED AS THE FIRST 
5 DATA DIGITS OF THE SECTOR RECORD ON CYLINDER 03. 
THIS ADDRESSES WERE DUPLICATED IN LATTER PART OF 



m 0023 
FN 2172365 
EC 412531 



219SG» 


PREVIOUS ^OUllf^r.i '^r ^' ^ gr^^r 


^ -At 












IS 


HADE TO C«.TbRN.M^ ^ ^H^^ bkli - 












22000* 


NO 


ADDRESS CHECK* AND CORRECT SECTOi . 


WAS 










22010* 
















22020 RT08 


TFM 


RSTRT"*-6f.*9« LOAD RESTART 




V 7 7 v7 W 








22030 


BTM 


TYP£»ZZ11»» TYPE READ SCTR 


099 72 

W 7 7 1 4b 


17 


030Q6 


0* WW 7 y , 


22040 


TFM 


RDCF'*-5»600 




W 7 7 t?»T 


1 A 


1 01 Q 7 
jL V i 7 f 


wAAA A 


22050 


.TFM 


R0CF+8f01f9 




V 7 V 7 o 




1 A 5 AA 


AA..A1 
UU*"0 A 


22060 


TF 


ROAREA+4fZEROl0-4 






26 


1 ^004 
* u W "» 


O? AO^ 


22070 


TF 


ROAR£A-M00»RMRST-5 




10020 




15100 


0'^'^40 


22080 


BTM 


INDRST**+12»» RESET INDICATOR 




1 7 


02QO& 


JAAA,A 


22090* 


READ DISK NUMERIC fl SECTORI 












22100 


RON 


ROCF. 










A A "^A 3 


221 10 


BCl 


*-12 










00100 


fc * ft. w 


CHECK FOR ADORERS CHECK 












221150 


61 


R8EU3600 








1 A 1 1 5 


A 9 X. A A 


22140* 


CHECK FOR 1 SECTOR TRANSFER 












22190 


8NR 


R8E2«RDAREA+100 




1 0080 




1 D^&R 


1 ft 1 A A 
1 7 A V W' 


22160 


BNR 


*+20»RDAREA'».99 




1 0005 




1 n 1 1 9 

i V 1 Jl< 




22170 


87 


R8E2 




10104 


•*7 




00000 


22180* 


CHECK FOR CORRECT SECTOR 












22190 


C 


RDAREA+4tR0CF+5 




10112 


24 


15004 


10197 


22200 


BNE 


R6E3 




10124 


47 


10368 


O120O 


22210* 


NEXT SECTOR 










22220 R8X2 


AM 


RDCF+5*01»10 






11 


10197 


000-1 


22130 


CM 


RDCF+5t620»» CHK DONE 






14 


10197 


-0620 


22240 


BNE 


R8X1 




lUiOU 


47 


10008 


01200 


22250 


BC4 


RT08+24 




IV J. 1 ^ 


46 


09984 


00400 


?^?60 


87 


RT08B 




10184 


49 


10720 


00000 


22270* 
















DO A 


•l»600,ltRDAREA 






00006 1-0600 










A w A 7 O 


oooo:^ -01 










10201 


00005 J5000 


22290 HESOAT 


DSC 


2S «9999999999233445566778899 




4k W & V V 


oooas 




22300 


dSC 


20»001 12233445566778899 




10231 


00020 




22310 


OSC 


2O»OO112233445566778099 




10251 


00020 




22320 


OSC 


20«0011223344556677e899 




10271 


00020 




22330 


DSC 


2 1 9 00 1 12233445566778899 « 




10291 

• V C> 7 A 


00021 




22340* 
















ft- 4m. w " 


















BTM 


«8XE»25lf91l» TYPE ERROR 






17 


10392 


00K5J 


22370 


BNC2 


R8X1 




10324 


47 


10008 


00200 


22380 


B 


RSTRT 




10336 


49 


00402 


00000 


22390 R8E2 


stm 


RaXEt252»9« TYPE ERROR 




10348 


17 


10392 


00K52 


12400 


®7 


R8E14.12 




10360 


49 


10324 


00000 


22410 R8E3 


BTM 


RdXE»253»9t TYPE ERROR 




10368 


17 


10392 


0OK53 


22420 


B7 


R8€l*12 




10380 


49 


10324 


00000 


2243C* 














22440* 


ERROR ROUTINE 












21410* 
















22460 


OS 






10391 


00005 





or 0023 
PN 2172366 
EC 412531 



05,47 



22470 mm 


BCl 










00100 


22480 


'RCTY 








r{ -)( * 


00102 


22490 


"WNTV 


RSTRT+2»»fl T¥Pi; LOCiJ^'niDri 




3d 




00100 


22500 


TO 


ERR-i-UtRSXE-B 


10428 


25 


03417 


10389 


22510 


TD 


ERR + 16»R8XE'-2 


10440 


25 


03419 


10390 


22520 


TD 


ERR-t-lS^RdXE-l 


10452 


25 


03421 


10391 


22530 


WATY 


ERR»»f TYPE tmOR ?^UMB£R 


10464 


39 


03403 


00X00 


22540 


WATY 


TR8A 


10476 


39 


10383 


00100 


22550 


TF 


TPOUT-URDGF+5 


10488 


26 


10578 


10197 


22560 


WNTY 


TP0UT-5»»« TYPE S/i BCIU ADRS ■ 


10500 


3a 




00100 


22570 


BNF 


*4>20*R8X£-1 


10512 


44 


10532 


10391 


?2580 


B7 


AAAA 


10524 


49 


1056S 


00000 


22590 


WATY 


TR6B 


10532 


39 


10611 


00100 


22600 


TF 


TPOUT-1 *RDAREA4-4 


10544 


26 


10578 


15004 


22610 


WNTY 


TPOUT-5«f9 TYPE SCTR ADRS RD 


10556 


38 


10574 


00100 


22620 AAAA 


H 




1Q568 


46 


00000 


00000 


22630 TPOUT 


DC 


03t««* 


10579 


00008 




22640 RBXEl 


BB2 




10560 


42 


00000 


00000 


22650 TR8A 


DAC 


14» TRIED TO RD • 


10583 


00028 




2?'660 TR8B 


DAC 


10# RD SCTR * 


10611 


00020 




22670 119 


DAC 


15»-C0MPARE LATCH* 


10631 


00030 




22660 ZZIO 


DAC 


19.-REST0RE ADDRESSES' 


10661 


00038 




22690 2211 


DAC 


11 •-RD SECTOR' 


10699 


00022 




22700* 














22710* 


MULTIPLE SECTORS 










22720* 














22730* 


THIS ROUTINE CHECKS THAT SEVERAL SUCCESSIVE 










22740* 


SECTORS CAN BE READ f21 SECTORS^ AFTER THE 










22750* 


SECTORS HAVE BEEN READ ALL 21 DUPLICATED SECTOR 








22760* 


ADDRESSES C REFER TO PHASE A) ARE CHECKED* 










22770* 














22180 RTOSB 


TFM 


RSTRT+6t»»f LOAD RESTART ADRS 


10720 


16 


00408 


J0720 


12190 


TFM 


RDCF4-5»600 


10732 


16 


10197 


-0600 


22800 


TFM 


RDCF+8»21f9 


10744 


16 


10200 


00-21 


22810 R8Y1 


TF 


RDAREA4-2100*RMRST 


10756 


26 


17100 


03545 


^2820 


8TM 


INDRST»*»» RESET INDICATORS 


10768 


17 


02904 


J0768 


22830* 


READ DISK NUMERIC (21 SECTORS 1 










22840 


RON 


RDCF 


10780 


36 


10192 


00702 


22850 


BCl 


»-12 


10792 


46 


10780 


00100 


22860 


BNI 


*+44»3600,, CHECK FOR ADRS CHK 


10804 


47 


10846 


03600 

V W V w 


22870 


BTM 


R8BE»254i9llf 


10816 


17 


11020 


0CK5M 


22880 R8Y3 


BNC2 


R8Y1 


10828 


47 


10756 


00200 


22890 


B7 


RT08 


10840 


49 


09960 


00000 


22900 


BNR 


»"e-24 9RDAREA+2i00 


10848 


45 


10872 


17100 


22910 


BNR 


*+32»RDAREA+2099 


10660 


45 


10092 


17099 


22920 


BTM 


R8BEt295 


10872 


17 


11020 


-0255 


22930 


B7 


R8Y3 


10884 


49 


10828 


00000 


22940* 


cor 


4PARE SCTR ADDRESSES 










22950 


TFM 


*>23»RDAREA+4 


10892 


16 


10915 


J5004 


22960 


C 


R0CF*5 • 99999 »• CHK SCTR ADRS 


10904 


24 


10197 


9999V 


22970 


BNE 


R8Y4 


10916 


47 


10996 


01200 



DT 0023 
PN 2172366 
EC 412531 



13 



22980 
22990 

25000 
23010 

23020 R6Y2 

23030 

230^^0* 

23050 R8Y4 

23060 

23070* 

23080* 

23090 

23100 

23110 

23120 

23130 

23140 

23150 

23160 

23170 

23180 

23190* 

23200 

23210 

23220 DRS 

23230 

23240 

23250 

23260 

23270 

23280 

23290 MBll 
2330Q# 

23310* 

23320* 

23330* 

23340* 

23350* 

23360* 

23370* 

233.00* . 

23390* 

23400* 

23410* 

23420* 

23430* 

23440* 

23450* 

13460* 

23470* 

I34i0» . 



AM 






. imm 


U 


lOlf? 




AH 


*-25»100- 




1094© 


u 


10915 


-0100 


CH 


«-37»RDAR€A-i'2104#» 


CHK DONE 


10932 


14 


10915 


J7104 


6NE 


«-60 




10964 


47 


10904 


01200 


BC4 


RT08 




X0976 


46 


09960 


004Q0 




RT09 




10988 


49 


11234 


OOQOO 


BTM 


R8BE«256»f 


TYPE ERROR 


10996 


17 


11020 


-0256 


B7 


R8Y3 




11008 


49 


10826 


00000 



DS 5 
BCl R8BE1 

RCTY 

WNTY RSTRT-i.2f»f 

TO ERR-J-U^RSBE-S 
ERR+16*R8BE-2 
ERR+18»R8Be-l 
WATY £RR»«* 
BNF *+20.R8BE-l 
B7 R88E1 
- DUMP SCTR AORS 
TFM DR8~l«R0AREA4-4 
19999.99999 
19995. 
19999 »0»» 



TO 

TO 



TYPE LOCATION 



TVPE ERROR NUMBER 



11019 
11020 
11032 
11044 
11056 
11060 
11080 
11092 
11104 
11116 



00003 
46 11232 
34 00000 

38 00404 
25 03417 
25 03419 
25 03421 

39 03403 
44 11124 
49 11232 



TF 

ONTY 
TFM 
3PTY 
AM 

CM 
BNE 

H 

BB2 



DUMP 

RESET DUMP AREA 



OR8""l9l00 

DR8-l«RDAREA+2104f • CHK DONE 
0R8-12 



11124 16 
11136 26 
11148 35 
11160 16 
11172 34 
11184 11 
11196 14 
1120S 47 
11220 46 
1123a 42 



i.ll%7 
19999 
19995 
19999 
00000 
11147 
11147 
11136 
00000 
00000 



00100 
00102 
00100 
11017 
11016 
11019 
00100 
11019 
00000 

J5004 
99999 
OOiOO 
-0000 
00101 
-0100 
J7104 
01200 
00000 
00000 



THIS ROUTINE CHECKS THE SEEK OPERATION* 
THE MUC I MULTIPLE USE COUNTER ) SET CONTROL 
LINES ARE CHECKEDtEACH BIT TRIGGER IN THE 
MUC COUNTERMAND THE MECHANICAL LINKAGES 
ARE EXERCISED TO DETERMINE PROPER OPERATION* 

PHASE CYL SCTR AORS MUC C lOO-.0O-4O"-2O-iO-8-4«2 TRIG) 



1 a ON 

0 • OFF 



A 


00 


00000 


00000000 


B 


01 


00200 


OOOQOOUl 


C 


02 


00400 


00000010 


D 


04 


00800 


00000100 


E 


05 


01000 


00001000 


F 


10 


02000 


00010000 


G 


20 


04000 


00100000 


H 


40 


08000 


01000000 


1 


50 


lOOOO 


10000000 


J 


63 


12600 


0011001 I 


K 


98 


19600 


11001011 



or 0023 
PN 2172366 

EC 412531 



05.49 



<S in O 

254VU* 












a« 1* «: 0s^m. 

23500» 












9 9 n 1 A 

« 5 !> 1 v» 


■ Irft OQu^ UrtlKA s 1 UrS lis *^ 










*1 fi K 4 A A 


THCN A KEAD TRACK 55 rE^<^ORMt.U 










& J J J 
























£ J ? jyj^ 


- PyrpPT rvi od amd oq twp ^^pttos? 












AAAfiCCCCC DCAA ^AUOA&CA t f% TUJT ce/*Tr»D 

ADDKtooto KcAD AKt vUMrAKtu iU mc. OC^IUK 










94K7A* 


AAflDPCC TM TMP A t Ctf J^'AMTOHl F t Pi fk * 
AUUacoO 1 rl 1 fit UION vvri 1 nUL. rlGLU® 










'I 9 K HI AA 


AN cKKuR TTrcOUl WILL OCCUK ir ?8ifc5t 










9 9 RO A* 


CC/"TAD AAADPCCPC CA t 1 TA -f-TiUD A83C PAISAS - 










'>44.AAa 


cKrlUK TiPcUUv"' 










1 4 iC 1 A A 

23olO» 


SEEK TO CYL XX ivENT TO CYL YY 






















23630 RT09 


TFM RSTRT'f6t*9 « LOAD RESTART ADRS 


11234 


16 


00408 


J1234 


23640 


BTM TYPE»TYP5K» ♦ f TYPE OPERATION 


1 1246 


1 7 


03096 


J2011 


23650 R0A2 


5K CYLa*»« seek to CYL 00 


11258 


34 


03546 


00701 


^ '1 A JL A 


TpM ♦▼23»SnADRSo » iPiiTIALlAC 




1 A. 

16 


i 12 V3 


J 1872 


23670 R8Ai 


TF SDCF4'5»99999 


11282 


26 


1 1859 


99999 


f 4 A 0 A it 


SEEK CYLIriOcK 














1 1 OQAt 






A A 7 A 1 
Uw / OA 


£ S 1 Uv» 


0P*ri TOA^If 










A 

£3 f lU 


CM i i » V * 1 V 


1 1 "5 n&. 
i A JUo 




■J 1 H 1 7 


AAA — A 


^'a*»*» A 

£3 t £V 


D T Ai e A^ C 


1 1 ^ 1 fi 




1 1 A *Si A 


AA 7 A f\ 


2 3 7 3 y 


BE RonU««t c.f£ Qr r ™ siArlyi UP 


•« 1 <a 11 A 
1 13 3\) 


A A 


1 15 A % O 


A 1 O A A 


^ ■91 f A A & 


'MUno""Ur •* POSITIVE STUP Off StElP. 










9'aT<S A 

« J f 




Jl A 3**£ 


A ^ 


A A O 3? 7 


AAA— •» 


£3 f 'BV 


! U y 1 9 nfi 


A A ,7 3 *f 


£ y 


A A AO 7 


y J 3 3 


•»« 77A 


D T M PSSfil^. .71 1 . A 

Din ckwr » » f n ♦ ♦ * 




1 7 
A r 


A'X 5 !? A 




^^Tll A 


WATV C^MAMA 
WA 1 T oKnArlw 


1 1 7 « 
i i ^ ) C 


'^Q 


1 1 Q A7 
A a7w r 


AA 1 A A 
Uv AUU 


c f * y 


WMTY • • a TVDP TVi Mfl 




J? w 


AAAQ 


An 1 A A 


£ 3 o u y 


rf 


t 1 /. A 5 




AA^i A A 
U U U U U 


A AAA A 
UUUU U 


9 fS 1 

£ J5 w it/ 


RMf? P ft A 1 4- 1 9 


1 A **• 


&.7 
^ f 


1 1 

A i & y *S 


W £ w 


£ 3 53 iC V 




A A ^i^O 


A.O 


l 1 T a A 
A A 4> 


nnoA A 


« J w 


V.Vrir'ArtC OCv.IV/K AI/I/AC«>9 










c 5 « ^ V r* w nu 




1 14^A 


%2 


I ^ n 0 Q 


V Wv^W w 


1% <ll R A 


V. oL/vr »AUAa&a*^» ♦ i.V/rlr'AttC, AuUKcOOCd 


1 1 A *i A 


It Jit. 


A A 


1 *iAAA 
APUW*fr 


s« A (k £ n 

Z386u 


BNE ReA3 


1 t A Ai '3> 
1 149^ 


A 7 
4 # 


1 1 & A 


A 1 "5 A A 


Z3870 RSA4 


AM R8A14>1 1 *0^* xO 9 NEXT PHASE 


11474 


11 


112V3 


AAA— K 


M Mtt A 4k A 

2^880 


TF *+23»R8Al+n 


11486 


26 


11909 


11293 


<% a A /\ 

23890 


BHn R8A1 •99999* » CHECK DONE 


11498 


45 


11282 


BB A A B 

99999 


23*ywUw 


SEEK TO CYL 99 










?3910 


TFM SOCF+5* 19800 


11510 


16 


11059 


J90OO 


23920 


5K SDCF«9» SEEK 


11522 


34 


11854 


00701 


23930* 












23940* 












23950* 


' THIS SUBPROGRAM WILL CHECK THAT THE P-ADRS 










23960* 


OF THE SEEK INSTRUCTION CAN BE INDIRECTLY 


ADDRESSED* 






23970* 


. THIS IS ONLY CHECKED ON THOSE SYSTEMS HAVING THE 








23980* 


INDIRECT ADOI^ESSING FEATURE* 










23990* 


. IF lA IS OKtSK TO CYL 50« IF NOTtSK TO CYL 


10« 









or 0023 
PN 2172366 
EC 412531 



24000» 



24010 RT9o 


TFM 










16 


00408 


J 153^ 


^ A n ^ A A 


CHECK TO DETERMINE 


IF CPU HAS lA 












24030 




N0!A»CKIA*11» 


I A « RM»No Ik ^ mmi 


ilS46 


45 


11666 


1203- 


24040 


SK 


CY1.3W 






11558 


34 


08548 


00701 


24050 


SIC 


2ASK»96» 


SK-P ADRS « INO AORS 


11570 


34 


12030 


00701 


24060» 


READ TRACK AND FIND 


OUT WHERE HEADS mm 












24070 


ftTM 


CYL3 


■■ ' - 




11582 


36 


03560 


00706 


24080 


SF 


RDAREA 






11594 


32 


15000 


00000 


24090 


CW 


ROAREA'^4«l0Obo»f 


CHK FOR CYL 50 




11606 


14 


15004 


JOOOO 


24100 


BE 


NOIA 










11666 


01200 


241 10 


BTM 


ERRN»261»» 


TYPE EnmR 




11©3Q 


17 


03220 




24120 


8NC2 


R9S1 






U642 


47 


11570 


00200 


24130 


B 


RT09 






11654 


49 


11234 


00000 


24140 NOIA 


BC4 


R8A2 






11666 


46 


11258 


00400 


24150 


B7 


RTIO 






11678 


49 


12074 


00000 


24160* 


















24170* 




ERROR ROUTINE 














24180* 


















24190 R8A3 


BCl 


R8A5 






11686 


46 


11830 


00100 


t A *l A A 

24200 


BTM 


ERRN«262«711f •» 






116 S 


17 


03220 


•~026K 


24210 


RCTY 








11710 


34 


00000 


00102 


Z4220 


MM 


SDCF4^3f05»10 






11722 


13 


11857 


000-5 




TO 


SKERl42»97»f 


INSERT SEEK TO CYL 


NO 


n n "» ■a /■ 
1 1734 


^» s 


11951 


00097 


24240 


TO 


SKER14.4»98 






11746 


25 


11953 


00098 


24250 




ROAREA4-2»05«10 






11758 


13 


15002 


000-5 


24260 


W 


SICER2+2t97»f 


INSERT WENT TO CYL 


HO 


m 

11770 


25 


11981 


00097 


24270 


TD 


SKER2+4»98 






11782 


25 


11983 


00098 


242S0 


WNTY 


RSTRT+2»*» 


TYPE LOCATION 




11794 


38 


00404 


00100 


24290 


<fATY 


SKER#»* 


TYPE ERROR 




11806 


39 


11925 


00100 


24300 


H 








11618 


48 


00000 


00000 


24310 f?iA5 


BNC2 


R8Al4'12 






11830 


47 


11294 


00200 


24320 


0 


RT09 






11842 


49 


11234 


00000 



24330* 
24340# 
24390* 
24360 SOCF 



DATA FOR ROUTINE 09 
PPA •1»99999»020*RDAREA 



24370 SKADRS DSA 



11854 00006 
11860 00003 

11863 00005 

00200f400 f 800 tlOOOf 2000*400098000 »10000tl2600t 19600 

11872 00005 
11877 
11882 
11887 
11892 
11897 
11902 
11907 
11912 



00005 
00005 
00005 
00005 
00005 
00005 
00005 
00005 



1R9999 

-20 

J5000 

-0200 
-0400 
-0800 
-1000 
-2000 
-4000 
-8000 
JOOOO 
J2600 



or 0023 
PN 2172366 
EC 412531 



05,51 



2^^380 

24390 SKER 
24400 SKERl 
24410 SKER2 
24420 SKHANG 
24430 TYPStC 
24440* 
24450 CKIA 
24460 CKIARM 
24470 

24480 lASIC 



24490 2212 
24500* 
24510* 
24520* 

24530* 
24540* 
24550* 
24560* 
24570* 
24580* 
24590* 
24600* 
24610* 
24620* 



DAC 
OAC 
DAC 
DAC 
OAC 



0^0 9 

Ut-SEEK TO 
15 ♦ 99 WENT TO CYL 
04» 99» 

12» SK TO CYL • 
08» - SEEK* 
DATA FOR PHASE B 
D5A CKIARM 
DC 01 

DC 04*0046** 

DDA •0f2000*20fRDAREA 



OAC 12t-6M CONTROL* 



ADRS * 00460 



us-rr J9600 

ii925 00024 
U949 00030' 
11979 OOOOS 
11987 00024 
12011 00016 

12030 00005 J2031 

12031 00001 

12035 00004 

12036 00006 0-2000 
12042 00003 -20 
12045 00005 J5000 
12051 00024 



THIS ROUTINE CHECKS THE GROUP MARK LATCH 

AND ALSO THE WLR/RBC RESET 

WITH GROUP MARK CONTROL* 
FUNCTION 
GROUP MARK LATCHtEVEN POSITION 
GROUP MARK LATCHtODO POSITION 
WLR-TRACK OPtlATE CYCLE GM - WLR/RBC RESET 
WLR-SCTR OP.LATE CYCLE 6M - WLR/RBC RESET 
RBC- DISK/MEMORY COMPARE - WLR/RBC RESET 



24630 RTIO 


TFM 


RSTRT"i-6»*e« 


LOAD RESTART 


12074 


16 


00408 


J2074 


24640 


BTM 


TYPE»ZZ12»» 


TYPE GM CNTRL 


12066 


17 


03096 


J2051 


24650 


TFM 


CYL3+5»600 




12098 


16 


03565 


-0600 


24660 


SK 


CYL3«tt 


SEEK TO CYL 03 


12110 


34 


03560 


00701 


24670* 
















24680* 


PUT A GM ON DISK IN THE EVEN POSITION 










24690* 
















24700 RlOO 


RON 


CYL3»»» 


READ DATA 


12122 


36 


03560 


00702 


24710 


TDM 


RDAREA+75.7»t 


RESET ODD GM 


12134 


15 


15075 


00007 


24720 


TD 


RDAREA474eDATAA«* 


INSERT GM 


12146 


25 


15074 


00811 


24730 


WON 


CYL3»»f 


WRITE GM 


12158 


38 


03560 


00702 


24740* 
















24750* 


READ DATA WITH EVEN GM 


fWLR OP 










24760* 
















24770 RlOA 


TF 


RDAREA't-TfttRMRSTtf 


RESET RD AREA 


12170 


26 


15076 


03345 


24780 


BTM 


!NDRST»«» 


RESET INDICATORS 


12162 


17 


02904 


-0000 


24790 


RDGN 


CYL3»#« 


RD DISKtWLR OP 


12194 


36 


03560 


00700 


24800 


8C1 


#-12 




12206 


46 


12194 


00100 


24S10* 


CHECK THAT GM STOPPED 


DATA XFER 










24820 


BNR 


*+20tRDAREA*75f ♦ 


CHK FOR RM 


12213 


45 


12238 


15075 


24830 


B7 


RTIOA 




12230 


49 


12274 


00000 


24640 


BTM 


ERRNf270»« 


GO TYPE ERROR 


12238 


17 


03220 


-0270 


24850 


8NC2 


RiOA 




12250 


47 


12170 


00200 



DT 0023 
PN 2172366 
EC 412531 



24800* ■ PUT A m ON. DISK THE ODD POSITION 

24890* 



24900 RTIOA 




CYL3 












Afl7A9 
W w f U& 


24910 


TOM 


RDAREA+74«7f ♦ 


■RESET EVE^ m 




«> ft* & V 




1S074 

A 4^ V ' ^ 


wwwU » 


74990 

^ 7 It w 


TD 


RDAR£A-*-75tDATAAf t 


IHSBRI 6M 




1 9 9 Q A 


91% 


1 9 V r 9 


AAAI 1 
wUO 1 1 




WON 


CYL3.»# 


PUT ODD GM ON DII 




«&d Aw 


A 


U.990U 


AA7A 9 

Uw lOc 


24940* 


READ DATA WITH ODD 6M»WLR OP 












24950 ^lOB 


TF 


RDAREA477»RMRST 






1 9'3199 


<£ 0 


A 9 V f r 


W59**>3 


24960 


BTM 


INDRST»»» 


RESET IriDICATOI^S 




1 9 '4 4, 

JS. «i ^ 


i. 1 






24970 


RD6N 


CYL3»»» 


RD DISICfWL^ OP ■ 






^ A, 




AA7A A 


9&OflO 


8C1 


♦^12 






t 4 4 K a 


4© 


t 9 "a A 4S. 


A A 1 A^ 


24990* 


CHECK THAT ODD 6M STOPPED DATA XFER 












25000 


BNR 


*+20,RDAREA4-76»» 


CHK FOR RM 




12370 


45 


12390 


1 507A 

A W f V 


25010 


B7 


RlOE 










t 9 A 5 A 
A 6 *t & 0 


A A A A A 


25020 


BTM 


ERRN*271»* 


GO TYPE ERROR 






1 7 


U.96 £ W 


»-0 9 71 


25030 


BNC2 


RlOB 






1 9402 


47 


19 329 


w w&w W 


25040 


B 


RTIO 






12414 


49 


12074 


ooono 

WW WW w 


25050* 


RESET GM-S ON DISK PACK 












25060 RIOC 


RON 


CYL3 






12426 


36 


03560 


00702 


25070 


1 i/pi 








12438 


15 


15074 


00007 


25080 










12450 


15 


15075 


00007 


25090 


WON 


CYL3 












An7A9 


25100* 


















25110 


ro 


RDAREA'*.2lOO»DATAAt$ 


INSERT GM AT END 






















X&*r » *> 


9 •» 


171 AA 


A A a 1 1 
wUo 1 1 


?51?0 Ritr 


BtM 


INDRST»»f 


RESET INDICATORS 




1 '9 CI 


1 "> 
A f 


A 1 0 A /. 


— AAA A 


25130 


RTGN 


CYL3»»» 


WtR-TRACK OP 




1 y as 


% ft 


A El A, A 


A. "I "^A If 

Uw f 0*> 


25140 


BCl 


»-12 






1 3 *» 1 (1 
4 c3 i. V 


4-6 




Afi 1 A rj 


25150 


BNI 


RllDt3700»t» 






t 9 K 9 9 


A.7 


1 9 ^7 A 


A ^7a A 


25160 


BTM 


ERRN»272f« 


GO TYPE ERROR 






1 7 


A^ 9 9 A 


— A 9'T 9 


25170 


8NC2 


RllC 








A.7 


1 9 A 


nn 9 A A 

W W4ww 




8, 


RTIO 










120 f 4 


AA AA A 


25200* 


















99910 ^iin 


TD 


RDAREA-f-aOOOfDATAA** 


INSERT GM AT END 


Kfr 




















1 9i»70 




1 70ftn 

A 1 WW 


A Aft 1 1 
wwO i X 


25220 


BTM 


INDRST»f» 


RESET INDICATORS 




12582 


1 7 


02904 


~0QOO 

W V v* w 


25230 


RDGN 


CYL3*t# 


WLR-SECTOR OP 




12594 


36 


03560 


00700 


25240 


BCl 


*-12 






12606 


46 


12594 


OOlOO 


25250 


aNi 


R11F»3700 






12618 


47 


12666 


03700 


25260 


BTM 


ERRN*273»* 


GO TYPE ERROR 




12630 


17 


03220 


-0273 


25270 


BNC2 


RllD 






12642 


47 


12570 


00200 


25280 


B 


RTIO 






12654 


49 


12074 


00000 


25290* 


















25300* 


















25310 nut 


BTM 


INDRST*»» 


RESET INDICATORS 




12666 


17 


02904 


-0000 


25320 


CD6N 


CYt3*«* 


RBC 




12678 


36 


03560 


00701 


25330 


BCl 


*-12 






126 0 


46 


12678 


00100 


2534|»0 


BNI 


R10Cf3700 






12702 


47 


12750 


03700 



m 0023 
FN 2172356 
EC 412531 



05.53 



25350 
25360 
25370 

25380 ftlOC 

25390* 

25400* 

25410* 

25420* 

25430* 

25440* 

25450* 

25460* 

25470* 

25480* 

25490* 

25500* 

25510* 

25520* 

25530* 



BMa niiE 

BC4 RTlO'4-24 



ROUTINE 12 

THIS ROUTINE FORCES ALL THE DISK 
ERROR LATCHES TO TURN QH» ALSO Am 



11 C?J.g<2C) "-02 74 
47 1^666 00200 
12738 49 12074 00000 
12750 46 12098 00400 



5?^ 



I NO 



(39) IS CHECKED 

PHASE INDICATOR 

A 36 

8 38 

C 37 

D 37 

E 19 



T IT ! 



HETHOD 
NO MATCHING SCTR AORS 
RO 21 SCTR WITH HO 9 
NO TERMINAL 6M (WLR) 
DATA UNEQUAL <RBCI 
IND 36 TURNS ON I NO 39 



25540 RT12 


TFM 


RSTRT46***t 


LOAD RESTART ADRS 


12762 


16 


00408 


J2762 


25550 


BTM 


TYRE»2Z13ft* 


TYPE FORCE ERROR LATCHES 
















12774 


17 


03096 


J3409 


25560 


SK 


CYL3*»* 


SEEK TO CYL 03 


12786 


34 


03560 


00701 


25570* 
















25580* 
















25590 R12A 


8TM 


INDRST»»» 


RESET INDICATOR 


12798 


17 


02904 


-0000 


25600 


RON 


ADRSCKte* 


READ DISK-FORCE AORS 


CHK 
12810 


36 


03574 


00702 


25610 


BCl 


*-12 




12822 


46 


12810 


00100 


25620 


BNt 


R12A1,3900 




12834 


47 


12894 


03900 


25630 


81 


R126»3600*» 


AORS CHK 


12846 


46 


12926 


03600 


25640 R12A2 


BTM 


ERRN#280,» 


60 TYPE ERROR 


12858 


17 


03220 


-0280 


25&50 


BNC2 


R12A 




12870 


47 


12798 


00200 


25660 


B 


RT12 




12882 


49 


12762 


ooobo 


25670 R12A1 . 


BNI 


R12A2»3600,» 


ADRS CHK 


12894 


47 


12858 


03600 


2S680 


BTW 


ERRN«281 


60 TYPE ERROR 


12906 


17 


03220 


-0281 


25690 


B7 


R12A2+12 




12918 


49 


12870 


00000 


25700* 
















25710* 
















25720 R12B 


BTM 


INDRST»t» 


RESET INDICATORS 


12926 


17 


02904 


-0000 


25730 


RDN 


CYLOV»»» 


FORCE OVFLO 


12938 


36 


13394 


00702 


25740 


BCl 


*** 1 2 




12950 


46 


12938 


00100 


25750 


BNI 


R12B1*3900«« 


ANY DISK 


12962 


47 


13022 


03900 


25760 


Bt 


R12C*3800»» 


OVFLO CHK 


12974 


46 


13054 


03800 


25770 R12B2' 


BTM 


ERRN«282»« 


60 TYPE ERROR 


12986 


17 


03220 


-0282 


25780 


BNC2 


Riaa 




12998 


47 


12926 


00200 


25790 


B 


RT12 




13010 


49 


12762 


00000 


25800 R12BI 


BNI 


R12B2f3800«f 


OVFLO CHK 


13022 


47 


12986 


03800 


25810 


BTM 


ERRNf283»f 


GO TYPE ERROR 


13034 


17 


03220 


-0283 


25820 


B7 


R12B24.12 




13046 


49 


12998 


00000 



25830* 



m 002 3 
PN 2172366 
EC 412531 



25840* 






25850 R12C 


BTM 




25860 


TDM 


RDAR£A4-2000«6^« 


25870 


RD6N 


CYt3t#» 


25880 


BCl 


*-12 


25890 






25900 


Gil 


R12D»3700«» 


25910 RI2C2 


BTM 


ERRNf 2B4»t 


25920 


BNC2 


R12C 






RT 1 2 






R 12C2 .^700 « h 


25950 


BTM 


ERRN«285 • • 


25960 




R12r24>12 








9^9An« 






25990 R12D 


BTM 


INDRST»«« 

• f^4y»\W 1 7 V V 


26000 


TDM 


RDAREA4>1000* • • 


26010 


CDN 


CYL3t»» 


26020 


BI 


R12E#3700 


26030 


BTM 


ERRN9286t« 


26040 


BNC2 


R120 


26050 


8 


RT12 


26060^ 






26070 R12E 


BTM 


INDRSTt«f 


26080* 






26090 


RON 


ADRSCICt** 

1^ ■ ^ %» '»» WWW 


26100 


BCl 


*-12 


26110 


Bl 


R12E1.1900,, 


26120 


BTM 


ERRN»2d7»f 


26130 


8NC2 


R12E 


26140 


B 


RT12 


26150 RX2E1 


3! 


»-*.12«3600 


26160 


BC4 


RT124.24 


26170 


B7 


RT13 


26180* 


DATA FOR ROUTINE 12 


26190 CYLOV 


DDA 


•1*780«21»R0AREA 



READ DISIC 



ANY DISK 

WLR CHK 

GO TYPE ERROR 



WLR CHK 
60 TYPE 



ERROR 



,4 - 

130 /a 

13090 

13102 
13114 
13126 
13138 
13150 
13162 
13174 
lSi86 



45 
36 
46 
47 
46 
17 
47 
49 
47 
17 
49 



RESET INDICATORS 
CHANGE DATA 
COMPARE DATA 

GO TYPE ERROR 



RESET INDICATORS 



13194 17 
13206 15 
13213 36 
13230 46 
13242 17 
13254 47 
13266 49 



02904 
17000 
03360 
13078 
13162 
1319% 
03220 
13054 
12762 
13126 
03220 
13136 



02904 
16000 
03560 
13278 
03220 
13194 
12762 



-0000- 
00000. 
00700 
00100 
03900 
03700 
-0284 
00200 
00000 
03700 
-0285 
00000 



-0000 
00000 
00703 
03700 
-0286 
00200 
00000 



13278 17 02904 -0000 



TURN ON AORS CHK* ANY DISK 

13290 36 03574 00702 
13302 46 13290 00100 
CHK THAT I NO 19 WAS TURNED ON 

13314 46 13362 01900 



GO TYPE ERROR 



26200 ZZIS 

26210* 

26220* 

26230* 

26240* 

26250* 

26260* 

26170 Rtl3 

26280 

26290* 

26300* 



0AC 19»-F0RCE ERR LATCHES' 



MAR 8 BIT lOK 



TFM RSTRT+6»*»t LOAD RESTART ADRS 

BTM TYPE»2Z14.* TYPE MAR 8 BIT lOK 

THIS PHASE CHECKS THE MAR 10 THOU 

8 BIT LATCH IN THE ISll. 



13326 17 03220 -0287 

13338 47 13278 00200 

13350 49 12762 00000' 

13362 46 13374 03600 

13374 46 12786 00400 

13386 49 13446 00000 

13394 00006 1-0780 
13400 00003 -21 
13403 00005 J5000 
13409 00038 



13446 16 00408 J3446 
134S8 17 03096 J3637 



or 0023 
FN 2172366 
EC 412531 



05.55 





RT M 


* riiuK'3> 8 t •§ 




k 3^"^ 


A f 


U «t 1? U # 






CW 


i 1 • y ft i w 




J. J'S'W / 


A** 


1 'X A ^7 a 


if\ jTv ^*\ __ ir\ 


*) <S 1 A 


D A U 

RUN 




5v.TR AUK«3 Mr ffu h 


■J "S y. Q i. 


■a £. 


1 a /. 'J 'i 


OuTOZ 




oCl 






X39Uo 


*»o 


134.^4 


OU 100 




NOP 






i3!>iO 




vwv vU 


A 1 1 rt A A 
vvMu w 


'1 £ 


BI 


«+36»1200tt 




1 4 & '9 


46 


13566 


01200 


26370 ZAB 


3TM 


ERRNt290#t 


GO TYPE C.RROR 


1 1 

13542 


17 


03220 


-0290 


2o3o0 


8 


WISCOl 




■J 1 c & /. 


49 


13470 


00000 


Zo3V0 


B! 


ZAB»800»t CHECK 






46 


13542 


00800 


26400 


BC4 


RT13+24 




^ 4 f!^ *9 A 

13578 


46 


13470 


00400 


26410 


6TM 


INDRST>t» 


RESET INDICATORS 


135 0 


17 


02904 


-0000 


26420 


BC3 


WLP1*«« 




1 3602 


46 


04006 


00300 


26430 


B7 


CMPLTD 




13614 


49 


13666 


00000 


26440* 


DATA FOR MISC ROUTINE 












26490 SA60K 


ODA 


•itdeeestooitRDAREA 




13622 


00006 108888 










13626 


00003 -01 










13631 


00005 J5000 


26460 2214 


OAC 


15»-HAR 8 BIT 10K« 




13637 


00030 




26470* 
















26480* 




TEST COMPLETE ROUTINE 










26490* 
















26500 CMPLTD 


TFM 


RSTRT+6»CMPLTD 




13666 


16 


00408 


J3666 


26510 


RCTY 






13678 


34 


00000 


00102 


t it. It ^ n 

26520 


SfTM 


REFN*54*10» 


60 TYPE REF M 




17 


03164 


000N4 




RCTY 








34 


00000 


00102 


26540 


Waty 


DONE 




137i4 


39 


13759 


00100 


9 (k A 


TFW 


RSTRT+6»START 




J> «t f £.0 


16 


00408 


-3616 


26560 


H 






13738 


48 


00000 


00000 


26570 


B7 


START 




13750 


49 


03616 


00000 


26580* 


TYPEOUTS 












26590 DONE 


DAC 


15»TEST COMPLETED* 




13759 


00030 




26600 


DAC 


02»00 




13789 


0000^ 




26610 !NVP 


DC 


03»0»» 




13791 


00003 




26620 


DS 


160 




13551 


00160 




26630 UST 


DC 


OlfO 




13952 


OOOOl 




26640 


DENO 


START 




036i6 









DT 0023 
PN 2172366 
EC 412531 



